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Dotata di un 
esclusivo si- 
stema di stampa 
ad impatto a quattro mar- 
telli elaborato da Seikosha, la 
GP700A stampa quattro colori in simul- 
tanea e consente una grafica ad alta risolu- 
zione in sette colori. I colori, definibili punto 
per punto, sono sovrapponibili senza pro- 
blemi di interferenza sino ad ottenere un 
numero praticamente illimitato di sfumatu- 
re di cui una sessantina ben apprezzabili. 


La stampa av- 
viene in maniera 
molto silenziosa 
grazie ad una cu- 
stodia notevolmen- 
te insonorizzata. 

La velocità di stampa 
di 50 CPS in ogni con- 
dizione d'uso è dovuta alla capacità di 
stampare più colori senza spostamenti del 
nastro. 

È incorporata la funzione di autotest. 


Caratteristiche: 

• Stampante ad impatto a matrice di punti 
da 80 colonne 

• Matrice dì stampa 5x8 (densità 13 cpi) e 
7x8 (densità 10 cpi) 

• Percorso di stampa monodirezionale (da 
sinistra a destra) 

• Capacità grafiche con indirizzamento del 
singolo dot 

• Possibilità dì ripetizione automatica di un 
carattere grafico 

• Velocità 50 caratteri/secondo (matrice 
5x8) e 38 caratteri/secondo (matrice 7x8) 

• Caratterizzazione: 10 e 13 cpi e relativi 
espansi 

• Interfacce: parallela Centronics (optionals: 
Spectrum, Sinclair ZX81, seriale RS232C, 
seriale TTY 20 mA current loop, seriale 


TTL, seriale RS232C spooler, Commodore 
VIC 20 e 64, Apple II, IEEE 488 per CBM 
Commodore, video composita per 
Commodore VIC 20 e C 64) 

• Alimentazione carta: trattori (larghezza 
modulo continuo variabile fino a 10") e 
frizione (foglio singolo) 

• Stampa 1 originale e 2 copie 

• Set di 116 caratteri ASCII 

• Consumo 10W (standby) o 25W (stampa) 

• Livello di rumore: inferiore a 60 dB 

• Durata di vita testa: 80 milioni di caratteri 

• MTBF: 2500 ore (escluso vita testa) 

• Peso 6 KG 

• Dimensioni: 

320 (prof) x 450 (largh) x 113 (alt) mm; 
395 (prof) mm. con separatore carta 

• Nastro: a quattro colori su cartuccia 
dedicata. 
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Per collaborare a SUPERVIC 


La maggior parte dei seguenti suggerimenti ha lo scopo di migliorare l'accuratezza e la velo- 
cità di pubblicazione di un articolo; rispettando questi consigli si accresceranno le probabi- 
lità che un vostro lavoro venga pubblicato. La rivista è interessata ad articoli e programmi 
riguardanti la linea Commodore. Siamo più interessati al contenuto di un articolo piuttosto 
che al suo stile, e soprattutto gli articoli devono essere chiari ed esaurienti. La seguente 
"guida" permetterà che le vostre buone idee e i vostri programmi vengano più facilmente 
accettati per la pubblicazione: 


1 l'angolo superiore sinistro della prima pa- 
gina dovrà contenere: nome, cognome, in- 
dirizzo, numero telefonico, codice fiscale e da- 
ta di spedizione. 

2 l'angolo superiore destro delta prima pagi- 
na dovrà contenere la marca e il tipo di 
computer al quale il lavoro si riferisce, unita- 
mente ad eventuali espansioni di memoria o 
periferiche richieste. 

3 il titolo sottolineato dell'articolo dovrà ini- 
ziare a circa due terzi in altezza della pri- 
ma pagina. 

4 le pagine seguenti potranno essere battu- 
te normalmente, con la condizione che 
l’angolo superiore destro contenga un'abbre- 
viazione del titolo e del cognome, unitamente 
al numero di pagina. Per esempio, Sprite 
Ed ./Brambilla/2. , 

tutte le linee del testo dell'articolo dovran- 
no essere battute con spazio 2 o spazio 3, 
e un margine di circa un centimetro dovrà tro- 
varsi ad entrambi I lati dello scritto. 

6 dovrà essere usata una carta formato A4 e 
lo scritto dovrà occupare un solo Iato del 
foglio (caratteri maiuscoli e minuscoli). 

7 i fogli dovranno essere uniti con una clip. 

8 avendo intenzione di spedire più di un arti- 
colo, questi dovranno essere inviati sepa- 
ratamente Insieme alla rispettiva copia su 
supporto magnetico. 

9 programmi brevi (meno di 20 linee) potran- 
no essere inseriti nel testo, mentre pro- 
grammi più lunghi dovranno essere listati se- 
paratamente. È ESSENZIALE per noi disporre 
di una copia del programma registrata più vol- 
te su supporto magnetico, ed anche su en- 
trambi i lati nel caso si usino cassette. È pre- 
feribile usare nastri di buona qualità e di lun- 
ghezza non eccessiva; la cassetta o il disco 
dovranno essere etichettati con il nome 
dell’autore, li titolo deM'articolo, il computer 
interessato e soprattutto le eventuali espan- 
sioni richieste. Come suggerimenti di pro- 


grammazione, si consiglia di usare le istruzio- 
ni “CHR$ (x )”, "TAB (x)", "SPC (x )" piutto- 
sto che stringhe di manipolazione del cursore. 
Ad esempio per uno scroll di 5 linee, l’istruzio- 
ne "FORI - 1T05:PRINT:NEXT" è molto più In- 
terpretabile di 5 Q inverse; e, invece di una 
dozzina di simboli di cursore a destra, perché 
non usare semplicemente "PRINT SPC (12)”? 
Un rapido controllo dei programmi per operare 
queste sostituzioni sarà motto apprezzato da 
noi e dai lettori. 

per maggior chiarezza, è conveniente 
usare caratteri maiuscoli riferendosi a 
istruzioni BASIC (esempio RETURN, LIST, 
RND, PRINT, etc.). Se si desidera evidenziare 
una parola, é preferibile sottolinearla piutto- 
sto che scriverla in carattere maiuscolo. 

n gll articoli ed i programmi potranno ave- 
re qualsiasi lunghezza • da una routine 
di una sola linea fino a programmi molto com- 
plessi. 

volendo includere fotografie, queste do- 
vranno essere in formato 24 x 36 o 6x 6, 
in bianco e nero o diapositive. 

non prenderemo in considerazione arti- 
coli che siano stati sottoposti ad altre 
case editrici. 

il compenso per la collaborazione pre- 
stata sarà commisurato alla complessi- 
tà e all’Interesse dei programma (da un mini- 
mo di L. 50.000 ad un massimo di L. 300.000). 
il pagamento è effettuato in caso di pubblica- 
zione del lavoro. 

il materiale ricevuto e non pubblicato 
non verrà restituito. 

Spedite l vostri lavori a: 

SUPERVIC 
Via Rosellini, 12 
20124 Milano 

e saremo lietissimi di pubblicare i contributi 
migliori. 

La Redazione 
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Il 



ABC... QUIZ 
in 10 fascicoli 

esercizi pratici, programmi, problemi H 
soluzioni per chi conosce il BASIC e 
vuole applicarlo 


ABC.. .QUIZ 
in 280 pagina 

[ problemi l toro algoritmi, la loro 
soluzione: il tracciamento dei 
diagrammi a blocchi; I fiatati del 
programmi e le varianti a seconda del 
diversi “dlalettr BASIC: I programmi 
professionali di largo uso: spreadsheet 
o fogli elettronici, word processor, data 


1 volume (Fovmatocm. 21x28) 

ricco di illustrazioni, ftowchart e 
programmi di gioco, utilità e pratica 

ABC.» QUIZ 

un'opera de rilegare e custodire In 
biblioteca, è firmala 


Piccola guida per 
l’input 

dei programmi 


M olti del programmi listati da SU PERVIO conten- 
gono particolari caratteri di controllo (controllo 
cursore» tasti colorai video- Inverse, etc). 

Per rendere chiaro ciò che dev’essere battuto quando 
è necessario Inserire uno del suddetti caratteri sono 
state stabilite le seguenti convenzioni 
Generalmente 1 listati per VIC 20 e C64 contengono 
delle «parole* racchiuse tra parentesi graffe ( }; tali 
parole rappresentano particolari caratteri di control- 
lo: (GIÙ) significa premere il simbolo del cursore ver- 
so il basso. (5 SPAZI 1 vuol dire battere 5 volte la 
barra-spazio. 

Per Indicare che un tasto dev'essere «shlftato», cioè 
premuto Insieme al tasto SHIFT* nel listato il simbo- 
lo di quel tasto sarà sottolineato* 

Per esempio^* significa che dev’essere premuto il ta- 
sto S mentre è abbassato II tasto SHIFT. 

La manovra farà apparire sullo schermo un piccolo 


«cuore». 

Trovando un simbolo sottolineato chiuso tra paren- 
tesi graffe (esemplo ( 1 0 £))) dovrà essere interpretato 
come «premere li carattere indicato per II numero di 
volte che lo precede nelle parentesi» nel nostro 
esemplo premere 10 volte 11 tasto N «shlftato». 

Se il tasto da premere è Indicato tra le parentesi [{ )] 
vuol dire che lo stesso dovrà essere premuto mentre 
è premuto il tasto «Commodore» (il tasto «Commo- 
dore» è quello posto nell'angolo In basso a sinistra). 
Se il tasto scritto tra [{ )) è preceduto da un numero, 
dò significa che II tasto dev'essere premuto per il nu- 
mero di volte Indicato* 


Raramente si potrà trovare un carattere alfabetico so- 
litario racchiuso tra parentesi graffe. Tale carattere 
sul C64 può essere battuto mentre è premuto il tasto 
CTRL 

Ad esempio {A] sta ad Indicare la sequenza CTRL-A, 
A proposito del «modo virgolette» è nota la possibili- 
tà di muovere il cursore sullo schermo con I tasti 
CRSR, Ogni tanto i programmatori desiderano muo- 
vere il cursore durante l'esecuzione del programma. 
t per questo motivo che nei programmi si troveran- 
no del ÌSIM}, (HOME) e (BLU). 

L'unico modo perché 11 calcolatore distingua II co- 
mando diretto da quello inserito nei programma è il 
■modo virgolette*. Premendo 11 tasto «virgolette» (te- 
sti SHIFT 2) il calcolatore si predispone appunto in 
«modo virgolette». 

Battendo un carattere qualsiasi cercando poi di cor- 
reggerlo muovendo II cursore a sinistra, si otterrà so- 
lo un tratto verticale In un quadratino inverso. Que- 
sto è infatti il simbolo del cursore a sinistra nel «mo- 
do virgolette». 

L’unico comando d! editing non utilizzabile al l'inter- 
no di un programma è il DEL. Battendo nuovamente 
le «virgolette» Il calcolatore lascia il «modo virgolet- 
te». Si può accedere al «modo virgolette» quando in- 
serite spazi nella linea. 

In ogni caso, il sistema più semplice per uscire dal 
«modo virgolette» è quello di premere II tasto RE- 
TURN. 

Utilizzare la tabella che segue quando è necessario 
inserire comandi relativi al cursore e al tasti colore. 


Quando leggete: 

Premete: Vedrete: 

tCLR} 

mji jiQiQi 

m 

{HOME} 


m 

{su} - 

em mm 

m 

{GIU 1 } 

asm 

E 

{SIS} 

em 3112] 

HI 

{DES} 

mm 

□ 

{RVS) 

EE9 a 

E 

{OFF} 

CESO 

9 

(BUE) 

km D 

■ 

{WHT) 

D9 Q 

m 

{RED} 

090 

e 
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Quando leggete: 

Premete: 

Vedrete: 

(CYM} 

KM O 

m 

{PUR} ■ 

199 B 

m 

( GRN } 

reniti 

□ 

(BLU) 

BIS B 

Q 

{ YEL } 

oso • 

ss 

1 < 1 > J 

30 

□ 

t<2>] 

SO 

H 

I<3>] 

QO 

e 

[«>) 

SO 

m 

t<5>) 

30 

E 

1<6>1 

30 

■1 


Quando leggete: 

Premete: 

Vedrete: 

1<7>I 

E3B 

□ 

[<e>] 

□ a 

mm 

mm 

{FI} 

m 

5 

IP2> 

EH 


(F3l 

EE) 


{ F4 } 

co 

i! 

{F5> 

OS 

Il 

(F6J 

CD 
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tF7] 

EH 

II 

{ F8 } 

KB 

■ 
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Caro lettore» 

nell'attimo numero di SuperVlC & C64 siamo usciti con un editoriale In "difesa" della carta, ri- 
spetto al solo supporto magnetico. 

Sono stati in molti a scrìvere e a telefonarci segnalandoci che. se la carta è un mezzo insostituibi- 
le per verificare i programmi digitati e per tutte le rubriche e gli articoli suirherdwere. la cassetta 
è senz'altro più "comoda": per archiviare i programmi, per utilizzarli immediatamente, per "ve- 
derli'' sul video da subito. 

Il risultato è quindi un numero speciale: SuperVlC & C64 con cassetta allegata. 

Certo, qualcosa è cambiato: il prezzo ad esempio» che peraltro abbiamo cercato di contenere» 
per non penalizzare troppo I lettori! 

A tale riguardo dobbiamo considerare che esistono sul mercato, ad un prezzo superiore, prodotti 
che di "cartaceo" hanno ben poco, essendo il contenuto delle riviste limitato al solo indice dei 
programmi. 

Sieri soddisfatti della soluzione proposta o siete di diverso parere? Fatecelo sapere! 

SuperVlC & CG4 di settembre è un numero di “prova": siete Voi che dovreste comunicare, tele- 
fonando o inviando il questionario pubblicato qui sotto, quale soluzione preferite per rendere la 
rivista sempre più Vostra e rispondente alle Vostre esigenze. 

In altre parole, preferite che la cassetta con 1 programmi sia sempre allegata a SuperVlC 6 C64. o 
desiderate che rivista e cassetta siano vendute separatamente, ad un prezzo complessivo ovvia- 
mente superiore? 

Grazie a tutti per fa collaborazione. 


Il Direttore 

I 


Tagliando da compilare ed inviare In busta chiusa a: J.soft * via Rosellini, 12*20124 Milano 

SU PERVIO & 064: LA PAROLA Al LETTORI 

p Ollirnj idea dnld^ro che SuperVlC & CM contenga In ogni numero Ja cadetta allegati, 

□ Peiiim* idea; grtf eliaco vedere i predoni In edicola separo! smente, anche h -|n queXO nKrdci 11 lemmi del due prerri {rtvllla e [nascila T 
sarebbe rvidenleTnenle superiore 


nome Cogeumc 

Indirli rm 


cep o»* 



La piccola guida 
del principiante 


Che cos'è un programma? 

Il solo computer non può compiere alcuna operazione. 

Un computer possiede potenziai iti ma, come una macchi- 
ne senza benzine, senza un programma, non può funziona- 
re. __ 

Le maggior parte dei programmi pubblicali su SU PERVIO 
per i computer Commodore sono scritti in un linguaggio 
per calcolatori chiamato BASJC. Il BASIC i facile da Impa- 
rare ed è disponibile, di serie, nei VIC 20 e nel Commodore 
64. 

Programmi BASIC 

Ogni mese. SU PER VIC pubblica programmi sia per II VIC 
che per II 64. Tanto per cominciare, se possiedi un VIC co- 
pia solo i programmi scritti per la tua macchina Indicati 
con "versione per VIC 2CT. Più tardi, quando avrai acquisi- 
to esperienza con il BASIC dei tuo computer, potrai cercare 
di copiare e convertire certi programmi per altri calcolato- 
ri. Diversamente dal linguaggio corrente, che può essere 
variamente interpretato, il BASIC di solito ha un solo modo 
corretto per Indicare qualcosa. 

Ogni lettera, carattere, o numero ha N suo significato. 

Un errore banale è costituito dalla sostituzione nel numero 
“0** con la lettera "O" oppure il carattere minuscolo ”1" in- 
vece del numero "1" o ancora il carattere maiuscolo **B“ 
con il numero T. 

Devi anche inserire tutta la punteggiatura, i due punti (:} e 
le virgole copiando esattamente dò che appare sulla rivi- 
sta. Oli spazi possono essere Importanti, Per essere sicuro, 
copia il listato esattamente come si presenta. 

Le parentesi e I caratteri speciali 

L'eccezione per questa regola di copiatura si presenta 
quando incontrerete indicazioni tra parentesi quali: 

Ogni cosa compresa tra parentesi è un carattere spedale 
oppure un carattere che non può essere facilmente prodot- 
to con la stampante. Incontrando un carattere di questo ti- 
po fate riferimento alla "Piccola guida per ["“Input* 7 dei pro- 
grammi'*. 

Le istruzioni DATA 

Alcuni programmi contengono una sezione, o delle sezio- 
ni. di Istruzioni DATA, Queste lìnee di istruzione fornisco- 
no le necessarie informazioni di cui II programma ha biso- 
gno. 

In alcuni casi le istruzioni DATA costituiscono 11 program- 
ma vero e proprio, altri contengono codici grafiti. Queste 


linee sono particolarmente soggette agii errori. Se un solo 
numero in una linea di istruzione DATA è sbagliato II cal- 
colatore potrebbe "piantarsi* 1 o distruggere II programma. 
La tastiera e II tasto STOP appaiono Inattivi e lo schermo 
completamente vuoto. Non lasciarti prendere dai panico. 
Non si è verificato alcun dannq. 

Per riprendere il cohtroilo devi spegnere il computer e suc- 
cessivamente riaccenderlo. CIÒ cancellerà qualsiasi pro- 
gramma presente in memoria per cui è necessario sempre 
fare li SAVE del vostro programma prima di comandare il 
RUM. 

Se il computer si ferma puoi caricare (LOAD) il programma 
e cercare Terrore, 

A volte, quando il programma viene “lanciato'*, un'istruzio- 
ne DATA errata può causare un messaggio di errore. 

Il messaggio di errore potrebbe riferirsi alla linea di pro- 
gramma che legge {READ) il contenuto delle istruzioni 
DATA. 


Come conoscere 11 computer 

Dovresti prendere confidenza con il computer prima di pro- 
cedere alla copiatura del programma. 

Impara le Istruzioni che si usano per memorizzare e richia- 
mare l programmi da nastro o da disco. Dovrai conservare 
una copia del tuo programma se non vorrai copiarlo ogni 
volta che io devi usare. Impara ad usare le funzioni di "edi- 
ting* della tua macchina. Come puoi correggere un errore? 
Puoi sempre ricopiare la linea e In questo caso devi sapere 
come procedere. Sapresti come Inserire I caratteri In “In- 
verse", l caratteri minuscoli e quelli di controllo? 

Tutto ciò è spiegato nel manuale del calcolatore. 

Un veloce ripasso 

1) Copiare il programma una linea aita volta, con ordine. 
Premere RETURN alla fine di ogni linea. Usare il 
tasto "DEL" per correggere gli errori 

2) Confrontare la linea copiata con quella presente nella 
rivista. Puoi controllare finterò programma ne) caso 
In cut si presenti un errore quando esegui il RUM del 
programma. 

3) Accertati di avere Inserito le Istruzioni tra parentesi 
graffe con gli appropriati caratteri di controllo (fai rife- 
rimento allo “Piccola guida per r“!nput" dei pro- 
grammi ' 1 che trovi In questa stessa rivista). 

Siamo spiacenti di non poter rispondere alle singole richie- 
ste di informazioni circa i programmi, prodotti, o 1 servizi 
apparsi su SUPERV1C, 



&WRITE 





A propositi» dcirOK-LIST 

Sono un appassionalo di computer e 
da sei mesi posseggo un VIC 20 con re» 
g latratore a cassette. Ho trovato rpolto 
interessante il programma QK-LIST 
pubblicato su S0PERV1C, in questuiti» 
mo si possono correggere direttamene 
te gli sbagli nella copiatura dei llstall- 
Vorrei chiedervi se esiste qualche mo- 
do per re-inserire POK-L1ST dopo aver- 
lo disattivato con i tasti RCJrVSTOP + 
GESTORE e dopo aver caricato In me- 
moria un altro listato da correggere. 
Siccome per motivi dì lavoro non rie- 
sco mal a terminare la copiatura dì li- 
stato in una volta soia, sarebbe molto 
utile poter usare OK-UST per controì- 
lare l vari pezzi di programma che bat- 
to di volta In volta. 

Angelo Saddi 

R t Ci sono giunte moltissime lettere 
sul tenore di questa a proposito 
dell'uso di OK-UST. Ricapitoliamo 
quindi l termini del problema: OK- 
LIST è un programma in linguaggio 
macchina che viene "pokato” nei buf- 
fer del registratore a cassette. Il buffer 
è una particolare area di memoria usa- 
ta per Immagazzinare temporanea- 
mente i dati in passaggio tra computer 
e registratore e viceversa. Quando si 
esegue un LO AD o un SA VE, li passag- 
gio dei dati nella stessa area in cui la* 
vora OK-LIST provoca la cancellazione 
di quest’ultimo od addirittura il blocco 
del computer se OK-LIST non è stato 
prima disabilitato con RUN/STOP + 
RE5TORE. È quindi evidente che OK- 
LIST può essere usato solo In fase di 
prima digitazione di un listato, a meno 
di disporre di un disk drive, nel qual 
caso non si hanno queste limitazioni. 
La scelta dei buffer del registratore co* 
me area di memoria nella quale alloca- 
re OK-LIST non è certo casuale, ma na- 
sce dall'esigenza di standardizzare il 
programma per l'uso sia con 11 VIC 20 


che con il C64 e di fare in modo che 
questo non venga cancellato dal pro- 
gramma BASIC che si sta battendo. 

Mei VIC 20 Tunica area di memoria 
con questi requisiti è apppunto il buf- 
fer del registratore, mentre nel C64 sì 
ha a disposizione anche l’area che ini- 
zia a 49152 decimale, e non è accessi- 
bile dal BASIC, Per aiutare almeno gli 
utenti di C$4. abbiamo rilocato OK- 
UST in questa zona di memoria. Que- 
sta versione di OK-UST sì attiva con 
SYS 49152 e SÌ disattiva sempre con la 
pressione contemporanea dei tasti 
RUN/STOP + RESTORE. Rimane 
sempre l’obbligo dì disattivare OK- 
UST prima di un SAVE o LO AD, ma 
poi lo si potrà tranquillamente riattiva- 
re con la SYS di cui sopra. 

Purtroppo, gli utenti di VIC 20, a causa 
della limitata quantità di memoria dì* 
sponibile, dovranno accontentarsi del- 
ia solita versione di OK-LIST allocata 
nel buffer del registratore. 

Diamo qui dì seguito 11 listato della va- 
riante di OK-LIST per il C$4. sperando 
di avere accontentato molti dei lettori 
che ci hanno scritto, 
loo w ni* i cl* ) annona »! 

fi 52TQ493M iMÀOfctCit*CK*AiHH3I * ****** 

no ircKo^•lr< J ^flwelUlft"^clO , <* L 

LB DATA " : E ICD 

120 r*INT”tCLIt) l 1 Olii* )OA-l*ìiT ATTIVATO" 

urtimi un* 

alt DATAI 71, 016 » 001 , 101 riso, 201 

191 OATA001 #0*4, U1 *33, 1*2, 1 73 

• M Oh TAO 32# Od# Ut , u , 1 *2*11* 

904 

fio DATAI 41, 017, ODI, li*, 000,133 
fi 6 OATA2 34, 0*4*032 *007,241 # t 31 

922 GATA2S1 » 134,232# M3, 241* 001 
«20 DATA201, 013*240, OIT.IOÌ, 032 
f 14 DATA2 40,00**024, 101*234,133 

94 0 0ATA2 34 * 1 4* , «3 * 1 ifi , 252 , 1 *4 
941 OATA2 SI* 040,094 , li*, 01 3, «2 
932 DATA2Ì 0*233, 143*214,141 *133 
*3» DATAI *2» 704,133» 1*2*14* »O0O 
*44 DATAI 31,21 «,14*, 01 >*032, 210 

970 DATAI 33 , 1 19 , 01 4* 032 * 21 0, 23* 

974 DATAI 49 * 034* 012, 31 0, 233, * ® J 
913 DATA294, 149*000» 131. 234* 172 
*•■ DATA33, 1*2*112, 047,201,004 
994 OATA0J3* 2O5,1Ì*,074* 1 17, 1*2 

1000 QATA013* 203*221,1 4*, 033*012 

1001 DATAI! 0,233,012,210, 291,173 

1 DI 2 DATAI 31, 1 *2,1 33, 21 4, 074 , 33*1 *2 


Cassette con II Music Editor 

Complimentandovi con voi per la nuo- 
va rivista, colgo l’occasione per chie- 
dervi, dal momento che mi sono avvi- 
cinato da poco al mondo dei compu- 
ter® (possiedo un C$4), come trasfor- 
mare il programma Music Editor per 
C64 in modo da poterlo utilizzare con 
lì registratore a cassette e non con II 
floppy disk, ed inoltre se è possibile 
caricare due diversi programmi gii re- 
gistrati e come. 

Gaetano DI Chiara 

R* Il programma Music Editor per C64 
nasce per essere utilizzato con floppy 
disk, tuttavia, come qualunque altro 
programma può essere modificato a 
secondo delle particolari esigenze di 
ciascuno. In particolare, la modifica 
per permettere l'utilizzo del registrato- 
re a cassette invece del floppy disk è 
concettualmente semplice, ma artico- 
lata da eseguirsi. 

Le linee che contengono ìe istruzioni 
di apertura di un canale verso il drive 
sono la 2010 e la 3010* che vanno cosi 
modificate; 

2010 GOSUB760; OPEN2*U,BR$ 
3010 GQ5UB76G: OPEN2,1.0 f BR$ 

Con queste modifiche il programma 
caricherà e leggerà i dati sul registrato- 
re a cassette invece che sul drive. Ri- 
mane però 11 problema della comparsa 
delle scritte "Press play on tape" e 
"Press Record&Pìay on Tape" che pro- 
vocano uno scroi! verso l'alto di tutta 
la videata. Sì può tuttavia ovviare facil- 
mente a questo Inconveniente ponen- 
do prima dell'istruzione ddl’apertura 
de! canale degli opportuni comandi di 
cursore in modo da provocare la com- 
parsa delie scritte nella zona dello 
schermo che si ritiene più opportuna. 
Passando al secondo quesito, purtrop- 
po a differenza di altri computer anche 
più economici, nè il ViC né il C64 pos- 
siedono l’Istruzione MERO E che per- 
mette di fondere In un unico program- 
ma quello che si trova attualmente in 
RAM ed un altro registrato su un appa- 
rato esterno. 

Tuttavia questa istruzione è disponibi- 
le in vari tool per il C$4, o può essere 
simulata ricorrendo a brevi routine* in 
linguaggio macchina. Cl ripromettia- 
mo appena possibile di pubblicarne 
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Il mondo de! software e dei servizi di informatica è difficile da fotogra- 
fare. Una domanda che varia di continuo, prodotti nuovi giornalmen- 
te immessi sul mercato. Non solo. U realtà italiana è ancor più 
complessa, per caratteristiche uniche di lingua, cultura, organizza- 
zione. 

Un mercato difficile, con infinite variabili. Noi della J, Soft abbiamo 
una risposta a tutte queste istanze: anzi, tutte le risposte. Perchè 
siamo un editore di software, di riviste e di libri su supporto magneti- 
co e su carta. 

In più, unici in Italia, distribuiamo su tutto il territorio nazionale, 
con una nostra rete di agenti, programmi nostri e della prima e più 
prestigiosa software-house indipendente del mondo: MICROSOFT. 
J. Soft con una struttura snella affronta con dinamicità tutti gli aspet- 
ti di questo nuovo mercato: dall'informazione alla formazione, dalla 
vendita all'assistenza post-vendita. 

H nostro cliente i un amico, sia esso un dealer, un utente finale, un 
abbonato. 

Sempre a sua disposizione, raggiungibili telefonicamente con un nu- 
mero diretto ( 02 - 6883228 ), per aiutarlo a risolvere un problema, a 
chiarire un dubbio, a far tesoro di tutti i suoi suggerimenti. 

J. Soft vuole distinguersi per una filosofia commerciale di una geo- 
metrica semplicità: offrire il meglio, nella forma più adatta, a un 
prezzo conveniente, con il miglior servizio. 


SOFTWARE! 



Il soft-p«btisbermìco 
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Music Machine, la 
musica elettronica a 
portata di tutti. 


I l Commodore 64 è H personal 
computer che possiede in assoluto 
le migliori capaciti di sintesi sonora e 
musicale. 

A questo compito è infatti dedicato un 
intero microprocessore parallelo a 
quello principale. JJ S1D (Sound 
interface Device) 6581, capace di 
gestire suoni polifonici su parecchie 
ottave e con forme d’onda variabili. 
Propio a causa di questa versatilità o 
potenza creare musica con il 
Commodore 64 da ambiente Basic 
comporta la stesura di programmi 
piuttosto complessi, con numerosi 
POKE, DATA e cidi di ritardo. 

Se si vuole In piegare il Commodore 64 
alla stregua di un semplice strumento 
musicale elettronico dalle notevoli 
possibilità, anche senza alcuna 
nozione di programmazione o di 
informatica in generale, ciò è possibile 
facendo uso di un nuovo programma 
della Commodore chiamato "Music 
Mach ine". 

Il Music Machine Commodore risiede 
su cartuccia ROM, quindi tutto quello 
che bisogna fare per cominciare a 
re mere il pulsante dell'accensione, 
ulto schermo compare un 
pentagramma e alcune scritte 
Indicanti lo stato del sistema. 

Come tastiera si impiegano le prime 
due file di tasti del calcolatore. 

La prima fila comanda 1 diesis e 1 
bemolli (tasti neri del pianoforte), la 
seconda fila le note naturali. 



L'estensione sonora dei Commodore 
64 trasformato In sintetizzatore, copre 
6 ottave (selezionabili tramite 1 tasti- 
cursore), una sola ottava In meno di un 
pianoforte da concerto. 

Ad ogni tasto premuto viene 
visualizzata su! pentagrama la nota 
corrispondente, mentre il suono esce 
dall'altoparlante de! televisore o del 
monitor. 

Per ogni suono, oltre all'altezza, è 
possibile selezionare anche la forma 
d'onda (quadra, triangolare, a dente di 
sega, ecc.), la forma dell'Inviluppo 
ADSR (Altack. Decay, Sustaln, Relea- 
se) e porre anche gli effetti spedali 
(Naturale, Vibrato e "Glide", 

Per esempio un suono generato 
tramite un'onda triangolare ha un 
timbro piuttosto dolce e ovattato, 
adatto per un accompagnamento, 
mentre lo stesso generato da un dente 


di sega sarà molto Incisivo e spiccherà 
sui sottofondo melodico. 

Similmente selezionando il registro 
Decay si avrà una nota slmile a quella 
generata dagli strumenti tradizionali, 
mentre II Sustaln darà un sound 
inconfondibilmente elettronico. 
Anche il Vibrato e 11 Glide 
contribuiscono a colorire La musica 
ottenuta, mediante l'ultimo in 
particolare risulta possibile ottenere 
l'effetto di "scivolate" passando da una 
nota all'altra, tipico delle migliori 
chitarre elettriche. 

Mediante un apposito comando (tasto 
"Shift" di destra) si possono ottenere 
anche effetti polifonici e accordi. 

I tasti di funzione sono In grado di 
fornire un accompagnamento ritmico. 
Oltre a insegnare i primi rudimenti 
della teoria musicale e il 
riconoscimento delle note il Music 
Machine Commodore ha 
caratteristiche tali da poter essere 
Impiegato a livello amatoriale come 
vero e proprio strumento musicale, 
tenendo soprattutto presente il basso 
costo del Commodore 64 rispetto a 
qualsiasi tipo di tastiera elettronica e U 
fatto che questo calcolatore è già 
predisposto per essere collegato con 
un amplificatore o un impianto hì*fi 
tramite un semplice cavetto DIN a cln^ 
que poli. 

Music Machlne Commodore è in 
vendita a L. 41.000 + IVA 
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LE MANS: sul filo 
dei 300 con il 
Commodore 64 


w % astano una cartuccia-gioco e una 
D paddi e collegata al computer, ed 
ecco che i motori rombano Impazienti, 
In attesa del segnale di via Ubera per 
gettarsi al Urtsegul mento degli avver- 
sari nel più famoso Gran Premio auto- 
mobilistico di Formula Uno, 

Con Le Mans il nuovo gioco realizzato 
dalla Commodore per il suo 64, IL ver 
tutti possono emulare le gesta di Niki 
Lauda al volante di una rombante For- 
mula Uno, cimentandosi in una cmo* 
zlonante gara contro il tempo sul filo 
dei 300 orari. Destreggiandosi fra chi* 
canes, curve ad esse, tratti ghiacciati e 
percorsi in notturna, bisogna cercare 
di tenere la media più alta, evitando di 
urtare gli avversari che caracollano 
sulla pista. 

Lemans è dotato di una grafica e di un 
sonoro paragonabili a quelli dei più fa- 
mosi vldeogames da bar, e riesce a 
esprimere al meglio le potenzialità del 
Commodore 64. L‘ obbiettivo del gioco 
è quello di superare gli avversari man* 
tenendo una velocità elevata senza 


uscire di pista o scontrarsi con le altre 
auto In gara. 

Lemans è facile da usare; basta infilare 
la cartuccia nella fessura posteriore del 
Commodore 64, co Nega re la paddi e 
alJ'appostta presa e accendere il com- 
puter. Il gioco si carica da sà, e chiun- 
que è In grado di battersi contro temi- 
bili avversari pronti a tutto pur di osta- 
colare la lunga marcia verso il traguar- 
do. 

La manopola della pad die si usa come 
volante, e ruotandola cl si sposta a de- 
stra e a sinistra lungo la corsia di mar- 
cia. 

Il bottone di sparo funziona da accele- 
ratore: tenendolo premuto si aumenta 
la velocità e si ottengono scatti bru- 
cianti. La strategia vincente è quella di 
guidare sempre "a tavoletta", senza 
mal scendere sotto i 300 Km/h, e di su- 
perare il maggior numero possibile dì 
avversari. In caso di incidente bisogna 
raggiungere Immediatamente t box 
evitando di perdere secondi preziosi 
nei l'auro versa mento della carreggiata. 



La guida sul tratto di pista ghiacciata è 
piuttosto difficile, perché i movimenti 
lungo la carreggiata risultano amplifi- 
cati dalia superficie scivolosa, niente a 
che vedere comunque con le guida 
notturna, durante la quale la pista è il- 
luminato soltanto dal fari della propria 
auto. 

Chi riuscisse a superare anche le famo- 
se "Esses", le micidiali curve che han- 
no reso celebre II circuito di Le Mans* 
dovrà comunque Imboccare uno 
strettissimo viadotto, ingombro di bo- 
lidi avversari ben felici di ostacolare il 
cammino. 

Ha arrivare al traguardo non è comun- 
que un problema, perché la gara term i- 
na sulla dirittura finale allo scadere del 
tempo di gioco. 

Lemans è in vendita a L 41.000. » + 
IVA 


Sul prossimo numero 
troverete: 



GRAFICA B1TMAP SUL C64: finalmente svelati tutti I trucchetti 
per ottenere semplicemente del disegni In alta risoluzione sul 
vostro C64. 



DISEGNATORE: grafici e disegni tridimensionali resi automatici 
da questo articolato programma che lavora completamente In 
alta risoluzione. 



TERAPIA: risolvete 1 problemi del vostro inconscio ricorrendo al 
vostro fido VIC o C64 che vi farà risparmiare 11 ricorso 
all'analista. 


S? TANTI ALTRI programmi, giochi ed Utilities per I vostri VIC e 
A C64 assetati di SUPER! 
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Iniziare con un sistema a dischi 


dì C. Brannon 

trad. e adatt. di M. Crittuib Drizzi 
Parte prima 


a n disk drive può rendere il carica- 
mento ed 11 salvataggio del pro- 
grammi molto più semplice ed empiii- 
ficare la velocità e la potenza delle vo- 
stre applicazioni. In ogni caso, un disk 
drive è molto di più di un registratore a 
cassette, e la sua notevole complessità 
può essere causa di malintesi; questa 
serie di articoli si ripromette di esplo- 
rare E vantaggi del sistema a dischi, ap- 
profondendo quanto riportato dal ma- 
nuale dei drive VlC 1540 e VIC 1541, 
ed anche qualcosa di più. 

Può darsi che siate ormai stanchi di 
cercare la posizione di un programma 
su una cassetta, e poi aspettare cinque 
o dieci minuti per caricare un pro- 
gramma un po' lungo... Oppure state 
usando con il registratore un bellissi- 
mo e completo programma di gestio- 
ne dati per la vostra attività, e scoprite 
che forse fareste prima a trovare un re- 
cord da voi piuttosto che tramite il 
computer... E che dire degli errori di 
caricamento che vi perseguitano? D al- 
tra parte, il prezzo relativamente basso 
del disk drive Commodore potrebbe 
sembrare esorbitante se i vantaggi fos- 
sero solo velocità e facilità d'uso; c se 
non vi Importa di attendere dieci minu- 
ti per caricare un gioco, probabilmente 
non avete bisogno di un disk drive. Se 
invece il registratore è l'anello piu de- 
bole nella catena del vostro "sistema”, 
otterrete un sostanziale innalzamento 
di prestazioni dal l'investi memo. 

In ogni caso, questa serie di articoli vi 
renderà edotti su ogni vantaggio ed 
ogni pecca del sistema a dischi Com- 
modore serie ] 540 e 1 54 1 . Vi daremo 
le Informazioni utili per iniziare ad 
usarlo come tutti i trucchettl per rica- 
varne le massime prestazioni. 

Per prima cosa, vediamo come è fatto 
un disco (Figura I): è come un sottile, 
flessibile (floppy) disco audio a 45 giri, 
con la differenza che è racchiuso da 
una busta di plastica. I floppy disk pos- 
sono avere un diametro di 6 pollici odi 
5 pollici e un quarto (minifloppy): que- 


Figura 1 vista In sezione 



sti ultimi sono ì più diffusi per 1 perso- 
nal computer. Recentemente alcune 
marche di computer hanno introdotto 
1 microfloppy, ma non si è ancora deci- 
so se la misura standard debba essere 
3 pollici, o 3 ed un quarto oppure an- 
cora 3 e mezzo. I dischi sono costituiti 
da mylar flessibile ricoperto dal fami- 
liare ossido magnetico del nastro da 
registrazione; è stato fatto molto lavo- 
ro per incrementare le prestazioni del 
floppy disk, ma la sua struttura basila- 
re è rimasta sempre la stessa. Le gros- 
se case produttrici di floppy disk 
(Scotch, Verbali m, BASF. Maxell, ed 
altre) ricavano i dischi da larghe pia- 
stre di mylar. e tutti i dischi - a singola 
e doppia faccia ed a singola e doppia 
densità (spiegheremo più avanti il si- 
gnificato di questi termini) - sono rica 
vati dalla stessa piastra. Quando pas- 
sano al controllo di qualità, vengono 
classificati un po' come le uova, e non 
è molto consolante sapere che il disco 
medio e faccia singola e singola densi- 
tà (cioè la classificazione più bassa) de- 
ve fallire numerosi test per entrare In 
questa categoria. 

Fortuna mia mente per noi utenti, la 
sempre più elevata domanda di dischi 
a singola facda/singoia densità co- 
stringe le fabbriche a mettere in com- 
mercio con questa classificazione an- 
che dischi di qualità superiore, al solo 
scopo di soddisfare le esigenze del 


mercato. Quando inserite il disco nel 
drive, un apposito perno di quest'ulti- 
mo ve ad Inserirsi nel suo foro centra- 
le, ma II centraggio non è mai perfetto. 
Ecco un primo trucco: per migliorare il 
centraggio Inserite II disco mentre 11 
motore sta girando (per farlo girare 
battete LO AD 8). La testina di re- 
gistrazione e lettura dei drive, che è si- 
mile a quella del registratore, deve 
avere un buon contatto con la superfi- 
cie del disco: quando la fessura di in- 
gresso è chiusa, li disco viene premuto 
dall'alto in modo che sia bene a contat- 
to con la testina: ecco perché il disco 
deve essere flessibile. Essendo la testi- 
na sotto II disco, è su questa facciata 
che esso viene registrato; tenetene 
conto quando lo maneggiate. La testi- 
na mobile (al contrario di quella del re- 
gistratore che è fissa) è montata su un 
binario rettilineo che le permette di 
muoversi avanti ed indietro attraverso 
la superficie del disco: un sistema ab- 
bastanza simile a quello usato sul gira- 
dischi stereo a tracciamento lineare. 
Infatti, l'analogia con il giradischi au- 
dio è molto utile per comprendere il 
funzionament dei disk drive. 

Se il vostro giradischi avesse la veloci- 
tà di rotazione del disk drive (300 girl 
al minuto) E vostri LP preferiti produr- 
rebbero solo una sequenza di acutissi- 
mi stridii. Ciò può dare un'idea di qua- 
le sìa la differenza di velocità con il re- 
gistratore a cassette. Il quale muove il 
nastro a 4.75 centimetri al secondo. 
Certo la velocità di rotazione del disco 
conta molto ai fini della rapidità de! ca- 
ricamento di un programma, ma non è 
l'unico fattore che rende II disk drive 
cosi rapido: egualmente Importante è 
Il modo con 11 quale il drive trova ciò 
che sta cercando sul disco. Al contra- 
rio del registratore, il drive può muo- 
vere la sua testina di registrazione / let- 
tura direttamente sulla parte del sup- 
porto magnetico nella quale sono im- 
magazzinati i dati che cì servono. Con 
un registratore — sia quello dello ste- 
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reo che quello del computer — biso- 
gna cercare ciò che vogliamo (sta una 
canzone che un programma) In modo 
sequenziale lungo il nastro; in altre pa- 
role. il nastro scorre davanti alla testi- 
na* che deve aspettare a caricare fino a 
che non le passi davanti la parte di na- 
stro che cerchiamo. Questo sistema, 
chiamato "accesso sequenziale"* è lan 
gemente inefficiente. Certamente po- 
tete premere il tasto di avanzamento 
veloce fino alla parte di nastro dove — 
pensate — inizi il programma (e non è 
mai lì,,*) oppure usare il contanastro 
per farlo giungere al numero che avete 
segnato su un foglietto (ma.,* che fine 
ha fatto?); inoltre il contanastro non è 
assolutamente preciso e le sue indica 
zioni variano enormemente tra regi 
stratori diversi pur dello stesso model 
lo e marca. Su un giradischi. Invece, 
non avete altro da fare che alzare M 
braccetto con la testina e porlo diretta- 
mente all'inizio del brano che volte 
ascoltare* saltando di getto tutti i pre- 
cedenti: un bel risparmio di tempo, 
no? Il disk drive lavora proprio cosi: 
con il sistema ad "accesso casuale". 
Ovviamente, le tracce del floppy sono 
molto diverse dai solchi dì un LP: 
quest ultimo possiede in realtà un uni- 
co solco che procede a spirale verso it 
centro, mentre le tracce del floppy so- 
no tutti anelli concentrici* Ogni traccia 
è a sua volta suddivisa in parti chiama- 
te "settori", ed ogni settore contiene 
un "blocco" di informazioni. La gran- 
dezza dei settori è variabile secondo la 
marca del drive* e nei Commodore è di 
256 byte. Molti dischi posseggono 40 
tracce, ed ogni traccia ha generalmen- 
te lo stesso numero di settori; un disco 
medio a singola densità può contenere 
circa 1 00 K ( 1 00000 byte), ma dò è va- 
riabile secondo il numero di settori per 
traccia. I dischi a doppia densità hanno 
un numero superiore di settori per 
traccia, cosa che richiede appunto una 
maggiore accuratezza di costruzione e 
qualità di materiale usato. 

La Commodore ha risolto brillante- 
mente la problematica della densità 
dei dischi: Il disco per 11 drive 
1540/1541 può contenere sino a 
l?0Kbyte con una conformazione a 
singola densità. Ciò è reso possìbile 
dall'uso di un numero variabile di set- 
tori per traccia (se si usano solo 35 
tracce). Le tracce esterne di un disco 
sono piu capaci e possono proporzio- 
nalmente contenere un numero di set 
tori superiore rispetto alle tracce inter- 
ne (vedi Figura 2); il sistema usato dal- 
la Commodore risolve anche il proble- 
ma lamentato da qualche tipo di drive 
quando si cerca di leggere o di scrivere 
sulle tracce più Interne, dove i settori 
sono stipati in modo più severo* 

A questo punto è opportuno introdurre 
1 concetti di "hard sectoring" e di "soft 
settori ng". 1 drive hard sectored richie- 
dono dei dischi con una serie di Fori 
che sono letti attraverso un foro di 
tempori zza zio ne (vedi la Figura I); i fo- 


ri dicono al drive la posizione di ogni 
settore. I drive sofot sectored* invece, 
sono in grado di localizzare un dato 
settore in base al tempo dà rotazione 
del disco. Quest'ultimo può variare 
dallo Standard di 300 giri al minuto, a 
seconda dell'accuratezza con la quale 
si sia posizionato il disco nel drive. 
Con questo sistema è sufficiente un so- 
lo foro di temporizzazione, anche se 
certi drive come gli Atari non ne hanno 
addirittura alcuno. I disk drive che usa- 
no il sistema di hard sectoring (fori 
multipli) non posono usare dischi soft 
sectored. mentre si possono usare en- 
trambi i tipi sul vostro drive soft secto- 
red 1 540/ ì 541* 

Fortunatamente, non dovete tenere a 
mente tutte queste informazioni quan- 
do usate il drive, dal momento che II 
sistema operativo del disco (DOS: Disk 
Operati ng System) sì preoccupa auto 

Figura 2 configurazione 
Trac cla/settore- 1/8 di superficie 



(1 vettori sodo «uddlrtilonl di trace* concentrici!*} 

mancamente della gestione del settori; 
tutto ciò che dovete fare è dire al com- 
puter se volete leggere o scrivere dei 
dati* ed il nome del file interessato. 
Inoltre* molti programmi applicativi 
compiono anche queste operazioni per 
voi: in BASIC ad esempio dovete solo 
dare i comandi SAVE o LOAD (che 
verranno approfonditi ptu tardi): un 
word processor vi chiede semplice- 
mente il nome del file e si prende cura 
di tutte le operazioni attinenti al salva- 
taggio o caricamento del file stesso. In 
ogni caso sarete responsabili del buon 
mantenimento dello stato fisico del vo- 
stri dischi; a questo scopo sarà oppor- 
tuno seguire attentamente alcuni sem- 
plici rego lette in proposito. 

Il disk drive rappresenta un investi- 
mento* e richiede quindi di essere trat- 
tato con cura per fornire sempre i mi- 
gliori risultati. Tenete i vostri dischi ad 
una ragionevole temperatura dell am- 
biente; per parafrasare un costruttore 
di dischi per computer. "Se la tempe- 
ratura è confortevole per voi* lo sarà 
anche per i vostri dischi." 

Maneggiate con cura i floppy disk: an- 
che se a volte possono ancora funzio- 
nare dopo essere stati piegati in due 
(se siete molto fortunati)* è meglio non 
prendere la parola "floppy" troppo let- 
teralmente. Ogni piccola piegatura nel 
disco può causare una rottura del film 
superficiale magnetico e provocare de- 
gli errori di lettura. 


Gn'ultìma raccomandazione é molto 
Importante: dal momento che I dischi 
immagazzinano le informazioni in mo- 
do magnetico* teneteli ben lontani dai 
campi magnetici* La fonte più comune 
(e più dannosa) di campi magnetici in 
un sistema casalingo è Tapparecchio 
TV o 11 monitor; non appoggiate mai i 
dischi sul televisore e non sistemateli 
mai a meno di trenta o quaranta centi- 
metri di distanza dall apparecchio* So- 
no in realtà molti gli apparecchi elettri- 
ci che generano campi 
magnetici pericolosi per i floppy disk: 
trasformatori, alimentatori* frigoriferi 
e refrigeratori* stampanti, etc. In gene 
raJe ogni apparato elettrico genera un 
campo magnetico, debole (nella mag- 
gioranza dei casi, fortunatamente!) o 
forte che sia, quindi è sempre buona 
regola tenere 1 propri dischi il più lon 
tano possibile da questo. 

È a questo punto, credo, superfluo 
consigliare dì tenere le caiamite ad 
una distanza "chilometrica" dai vostri 
floppy,.;! Ed inoltre è meglio non siste- 
marli vicino ad un apparecchio telefo- 
nico: ogni volta che questo suona, ge- 
nera un campo magnetico. 

I produttori ci dicono di trattare i di- 
schi come se fossero uova: tuttavia in 
realtà questi sono abbastanza resisten- 
ti a stress meccanici. Le persone che 
per lavoro hanno quotidianamente a 
che fare con ì floppy amano raccontare 
storie stile "horror" su come dischi ap- 
parentemente irrecuperabili sono inve- 
ce stati riutilizzati; la mia preferita è la 
seguente: un tool BASIC estremamen- 
te utile registrato su un disco In copia - 
bile era rimasto vittima dì un rovescia- 
mento di bicchiere contenente scirop- 
po di lampione. Potete facilmente im- 
maginare Jo stato del disco dopo due 
giorni quando me ne sono accorto con 
un colpo ai cuore.*. Ebbene — ho pen- 
sato — perso per per* i, si può tentare 
un trattamento estremo: estratto mol- 
to attentamente il disco dalla sua "ve- 
ste’ 1 nera, lo ho lavato sotto acqua cor- 
rente con un detergente molto legge- 
ro* Dopo averlo lasciato asciugare tra 
due tovaglioli di carta, ho preso una 
nuova copertura da un disco nuovo e 
l'ho sfruttata per quello danneggiato, 
chiudendo l'apertura praticata per sfi- 
larla con un po' di nastro adesivo. Il di- 
sco ora funzionava perfettamente sen- 
za alcun problema! In ogni caso, devo 
ammettere di essere stato molto fortu- 
nato.,. 

Perché è così importante recuperare 
un disco danneggiato? La ragione è 
che un disco può contenere ì 7QK, così 
se un floppy pieno si rovina* è vera- 
mente molto quello che sì perde. Per 
questo è SEMPRE opportuno, quando 
è possibile, fare delle copie dei propri 
dischi, ed aggiornarle man mano che 
nuovi programmi si aggiungano ai pre- 
cedenti. Il sitema della "Back up copy" 
cl salvaguarderà sempre ed in ogni ca- 
so da eventualità come quella di cui 
sopra. 
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Costruire 11 "tlstemi" 
Home Computer 

Non è escluso che uni periferica 
possa costare più del vostro com- 
puter: cosi, fare il giusto acquisto 
è un dovere per 11 portafogli. Di 
quale periferica avete bisogno? 
Necessiterà di software a parte 
una volta acquistata? Questo arti* 
colo cerca di offrire una panorami- 
ca sul Targo mento, 

I fanatici del computer spesso al van- 
tano dei propri “sistemi"* creandovi 
attorno un'auro di sofisti caletta da 
centro di calcolo spaziale; questi siste- 
mi spesso consìstono In un mlcrocom- 
puter circondato do un più o meno va- 
sto assortimento di periferiche. 

Uno periferica è in generale qualsiasi 
cosa si col leghi al computer; anche 
senza rendervi conto» avete iniziato ad 
aggiungere periferiche e costruire II 
vostro sistemo al momento stesso 
dell'acquisto del computer: la prima 
periferica è sempre l'apparecchio TV 
od il monitor, e la seconda è In genere 
il registratore a cassette per caricare e 
salvare ì programmi. Ed II joystick: 
non è forse anch'esso una periferica? 
Da qui In poi, l'elenco delle possibili 
periferiche per il vostro computer è 
piuttosto lungo; stampante, unità a di- 
schi, modem, cartrldge di espansione 
della memoria, penna ottica, sintetiz- 
zatore di voce, plotter, etc. 

Tocca a voi decidere quali siano le pe- 
riferiche delle quali avete bisogno: un 
disk drive per fare seriamente del word 
processing, un monitor a colori per im- 
magini più definite, un modem per te- 
lecomunicazioni... Sarà La vostra cono- 


Aggiungere 
periferiche 


scenza del settore a decidere la quanti- 
tà di tempo spesa a comparare prezzo 
e qualità dei modelli della periferica 
scelta disponibili sul mercato. Se avete 
già provato a buttare un occhio nel ne- 
gozi specializzati* vi sarete certamente 
accorti che non è affatto strano per un 
apparato periferico costare più dei 
computer al quaie è collegato. 

Quak’è la «celta migliore? 

Il modo più ovvio per garantirsi da pro- 
blemi di interfacciamento tra periferi- 
che e computer è quello di acquistare 
prodotti della stessa casa costruttrice 
deJ calcolatore stesso. Tuttavia non 
sempre questi offrono il miglior rap- 
porto qualità -prezzo e spesso sono prò- 
dotti di altre aziende venduti con LI 
marchio della casa costruttrice del 
computer: sovente le grosse compa- 
gnie acquistano ('hardware in elevate 
quantità presso altre industrie elettro- 
niche e lo distribuiscono con il proprio 
marchio. 

In molti di questi casi il prodotto è di- 
rettamente acquistabile “alla fonte" ri- 
sparmiando una certa percentuale del 
prezzo d’acquisto. La chiave per sco- 
prire la maggiore o minore convenien- 
za di questa speculazione è appurare 
se è stato solo modificato II marchio 
“tout court"» oppure se sono state fatte 
anche delle modifiche hardware per 
adattare la periferica ad un particolare 
computer; ad esempio* come tutti ben 
sappiamo. I computer Commodore 
possiedono un set di caratteri grafici 
direttamente accessibili da tastiera; la 
Commodore vende una stampante co 
struita da un'altra compagnia ma mo- 
dificata per stampare questo set di ca- 


ratteri. Stampanti del tutto slmili sono 
disponibili anche di altre marche, ma 
non possono stampare I caratteri grafi- 
ci del set Commodore se non acqui- 
stando a parte un chip ROM addiziona- 
le ed Installandolo nella stampante. 

Il prezzo non dovrebbe essere runico 
elemento di giudizio quando si tratta 
di decidere quale periferica acquistare: 
un altro fattore di primaria importanza 
da considerare è la facilità di Interfac- 
ciamento. Usando ancora come esem- 
pio le stampanti, una stampante da 
500.000 lire che richieda un modulo di 
Interfaccia da 100.000 lire per essere 
col legata aJ vostro computer, non é 
preferibile ad un modello da 600,000 
lire che sia Invece direttamente colle- 
gabile* In aggiunta, non tutte le Inter- 
facce sono identiche: un amico ha ac- 
quistato di recente un'Interfaccia che 
poteva essere usata per collegare un 
ViC 20 ad una serie di popolari stam- 
panti a matrice di punti. Ingenuo, pen- 
sava dì collegarla semplicemente ai 
VIC da una parte ed alla stampante 
detrai tra, mentre solo dopo un'attenta 
lettura del manuale di Istruzioni ha 
scoperto che si doveva aprire la stam- 
pante e saldare un cavo che provvedes- 
se all'alimentazione del l'Interface lai 
Una modifica del genere avrebbe sicu- 
ramente Invalidato La garanzia della 
stampante* oltre a creare le notevoli 
perplessità che sempre sopraggiungo- 
no quando sì devono mettere le mani 
nell 'hardware. È proprio questo 11 tipo 
di dettagli che è bene Investigare pri- 
ma dell’acquisto di una periferica che 
non sia direttamente collegabile al vo- 
stro sistema. Inoltre bisogna sempre ri- 
cordarsi di Investigare circa le necessi- 
tà di speciali cavi di collegamento al 
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computer; non è raro il caso dell'acqui 
rente che soddisfatto ritorna a casa dal 
negozio con la periferica, per scoprire 
la necessità di un connettore spedale 
per effettuare il collegamento, E poi 
magari d si accorge che questo con- 
nettore costa cinquantamila lire. Gli 
utenti con esperienza di saldature pos 
sono costruirsi queste connessioni in 
proprio risparmiando 11 costo del cavo, 
ma non essendo questo un lavoro per 
principianti, è sempre opportuno con- 
trollare che con la periferica vengano 
fomiti anche tutti I necessari connetto- 
ri. 

Il software 

Un altro parametro da considerare è li 
supporto software richiesto; alcune pe- 
riferiche non richiedono software ag- 
giuntivo per il funzionamento, mentre 
altre, se ne sono prive, diventano com- 
pletamente inservibili. Ad esempio, la 
stessa penna ottica può essere usata 
indifferentemente su un Alari, VJG o 
C64 f ma senza un apposito software 
per leggere il valore corrispondente al- 
la posizione della penna e convertirlo 
nella locazione video equivalente del 
vostro particolare computer, la penna 
non vi servirà a molto. Se non siete an- 
cora programmatori esperti a suffi- 
cienza per scrivere in proprio II softwa- 
re necessario, assicuratevi sempre che 
questo venga fornito Insieme alla peri- 
ferica che state acquistando. CIÒ vale 
soprattutto per apparati complessi co- 
me sintetizzatori vocali e pio iter. 

Mancanza di standardlzuzloite 

Esistono pochi standard per Le periferi- 
che degli home computer. Molto di 
questa carenza di standardizzazione è 
dovuto al fatto che le diverse case pro- 
duttrici seguono differenti filosofie dì 
progetto. Ad esempio, il funzionamen- 


to meccanico di tutti I drive per floppy 
disk da 5 pollici e 1/4 è essenzialmente 
identico, tuttavia quasi nessuna di que- 
sta unità à Intercambiabile con le altre; 
usando lo stesso hardware dì base» un 
drive Commodore immagazzina i dati 
sul disco In 683 settori di 256 byte cia- 
scuno; un drive del TRS 80 Color Com- 
puter In 630 settori di 256 byte, un dri- 
ve Apple 11 In 560 settori di 256 byte, 
ed un drive Texas Instruments in 360 
settori di 256 byte, 1 drive Atari poi 
usano 720 settori, ma ogni settore è 
lungo solo 128 byte, il Commodore 
scrive la directory sulla pista 16 del di- 
sco, r Apple ed il TRS 80 sulla 17* ed 11 
TI sulla pista 0. Tutto dò non solo ren- 
de I drive incompatibili, ma significa 
anche che I dischi registrati su uno non 
possono essere lieti su un altro di questi 
drive. Ogni costruttore ha solidi argo- 
menti per sostenere che il proprio si- 
stema è il migliore, e nessuno sembra 
voglia scendere ad un compromesso 
In nome della compatibilità. 

Interfacce 

Qualche tentativo di standardizzazione 
é però stato fatto. Ad esemplo un'Indu- 
stria, La Centronics, era una delle prin- 
cipali fabbriche di stampami per com- 
puter, ed usava uno schema di inter- 
faccia parallela in cui I dati erano invia- 
ti alla stampante un byte alla volta. Le 
industrie che entrarono nel mercato in 
tempi successivi usarono la connessio- 
ne Centronics, in modo che le loro 
stampanti potessero essere diretta- 
mente collegabili al computer costruiti 
per le stampanti Centronics. 

Cosi questo sistema di connessione, 
con la sua spina a 36 poli, diventò di 
fatto uno standard, e te interfacce pa- 
rallele Centronics sono ora disponibili 
per molti home computer. Uno stan- 
dard più formale è stato invece defini- 
to per la trasmissione di dati In modo 


seriale: io standard, chiamato RS-232, 
consiste in un insieme di cavi che In- 
clude una linea di trasmissione dati, 
una linea di ricezione dati, ed una col- 
lexlone di linee di segnale 
' hand shake" per regolare il trasferi- 
mento dei dati. Più In particolare, un 
connettore chiamato DB25 è quasi 
sempre usato sulle linee RS-232, ed a 
ogni polo dì questo connettore è stato 
assegnato un particolare segnale della 
RS-232. Cosi» se il vostro computer 
possiede una porta RS-232, potete In- 
terfacciare senza problemi ogni perife- 
rica RS-232 competi bile» giusto? 
Sbagliato. Sfortunatamente, lo stan- 
dard RS-232 definisce un set di linee di 
segnale, ma si dimentica di stabilire 
quale deve essere considerato un se- 
gnale valido su queste linee: alcuni si- 
stemi RS-232 usano come livelli di se- 
gnale di riferimento +12 volt e -12 
voh, altri + 5 V e -5 V, e pochi altri an- 
cora usano + 5 V e 0 V. In particolare 11 
VIC 20 ed il C64 posseggono del soft- 
ware su ROM per la gestione delle co- 
municazioni RS-232 attraverso la User 
Pori, ma se volete usare la maggior 
parte delle perifèriche non Commodo- 
re, dovrete sistemare nella User Pori 
stessa un modulo di interfaccia per au- 
mentare i livelli di tensione in uscita. 
Dovete tener conto di questo se pensa- 
te di acquistare una periferica "stan- 
dard" RS-232. Forse nel futuro qual- 
che Industria arriverà a dominare una 
fetta sufficientemente larga del merca- 
to degli home computer per potere de- 
terminare uno standard generale. Al- 
cuni dicono che sarà il PC IBM a diven- 
tare Tarchetlpo» altri confidano 
nell'esperimento nippo-amerlcono di 
standard MSX... per I! momento "con- 
soliamoci" pensando che per qualsiasi 
tipo e marca di computer si trova mol- 
to più equipaggiamento incompatibile 
di quanto se ne trovi di compatibile. 


Per ricevere la cassetta contenente 
I programmi di SU PER VIC 
compilate e spedite II coupon qui sotto! 
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dei listati 


OK-List 
per la 
battitura 


I nserite in memoria l'OK-UST prima 
di accingervi a battere f listati pubbli- 
cati: avrete a disposizione un formida- 
bile mezzo per essere sicuri di aver in- 
serito nei computer ogni carattere in 
modo assolutamente corretto. 

Tutti i nostri listati sono caratterizzati 
da un numero aggiunto ad ogni linea 
di programma, ad esemplo: rem J23. 
NON COPIATE QUESTA PARTE DEL- 
LA LINEAI Serve unicamente per vo- 
stra informazione, LI strazio ne REM ha 
runico scopo di renderla Inoffensiva se 
per errore doveste batterla. 

Se, prima di iniziare il lavoro di battitu- 
ra del listato, caricate in memoria OK- 
UST e lo attivate con SYS 886* per 
ogni linea che battete verri visualizza- 
to un numero (detto di checksum) 
nel Fango lo superiore sinistro delio 
schermo. 

Confrontate questo numero con quello 
pubblicato per ogni linea del listato; se 
non corrisponde, ciò significa che ave- 
te commesso un errore nella battitura 
della linea stessa. 

Le ore buttate per cercare e correggere 
errori di batttura in programmi che 
non funzionano saranno solo un lonta- 
no ricordo! 

Due ultime cose di cui tenere conto: 
OK-UST non tiene conto degli spazi; 
questo per vostra convenienza, poiché 
questi generalmente sono poco impor- 
tanti. 

infine, OK-UST è allocato nei buffer 
del registratore (locazioni 886- 1018), 
quindi prima di salvare su cassetta li 
programma che state battendo, ricor- 
datevi di disabilitarlo premendo con- 
temporaneamente RU N/STOP + RE- 
STORE, Potrete poi riattivarlo con 
SYS 886, 

Il sistema più comodo per usare OK- 
LIST è quello di battere normalmente 
il programma, quindi listarlo e portarsi 
con II cursore sul numero di linea più 
basso che appare sul video; premere 
quindi RETURN e confrontare II nume- 
ro di checksum visualizzato nell'ango- 
lo superiore sinistro del video con 
quello pubblicato per la data riga del 
programma. Il cursore Si porterà auto- 
maticamente sulla linea successiva, e 
non dovrete fare altro che premere 
nuovamente RETURN per ottenere 11 
checksum seguente. 

Data Farea di memoria in cui si trova, 
OK-UST non può essere usato per con- 
trollare un programma' giè salvato su 
cassetta, mentre dò è possibile se II 
programma è stato registrato su disco. 


OK-UST 100 PRINT" (CLR) ATTENDERE PREGO...» 

versione 105 FORI ” 886TO1018:R ® ADfc!CI( “Cit+A sporsi,*: 

BEXT 

per VIC 20 no if ck<>17539 then print"{ghj' Jerrore 

e r£4 NELUB ISTRUZIONI DATA" : END 

120 SYS886 : PRINT" (CLR) ( 2 GIU ’ JOK-LIST *1 
TI VATO » ■ ; HEW 

8B6 DATA 173,036,003,201,150,208 
892 DATA 001,096,141,151,003,173 
898 DATA 037,003,141,152,003,169 
904 DATA ISO, 141,036,003,169,003 
910 DATA 141,037,003,169,000,133 
916 DATA 254,096,032,087,241,133 
922 DATA 251,134,252,132,253,008 
928 DATA 201,013,240,017,201,032 
934 DATA 240,005,024,101,254,133 
940 DATA 254,165,251,166,252,164 
946 DATA 253,040,096,169,013,032 
952 DATA 210,255,165,214,141,251 
958 DATA 003,206,251,003,169,000 
964 DATA 133,216,169,019,032,210 
970 DATA 255,169,018,032,210,255 
976 DATA 169,058,032,210,255,166 
982 DATA 254,169,000,133,254,172 
988 DATA 151,003,192,087,208,006 
994 DATA 032,205,189,076,235,003 
1000 DATA 032,205,221,169,032,032 
1006 DATA 210,255,032,210,255,173 
1012 DATA 251,003,133,214,076,173 
1018 DATA 003 
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MLX nuova versione 


dì C Brannon 

trad, e odati. dì F. Stella e 

M, Crlstulb Grlzzl 


Per l’Introduzione senza errori di 
programmi In linguaggio macchi- 
mi* 

MLX è un programma che permette di 
inserire listati in linguaggio macchina 
In modo assolutamente sicuro da erro- 
rì e senza la perdita di tempo del dover 
battere e controllare lunghe sequenze 
di istruzioni DATA, 

Molti dei nostri listati dì programmi in 
linguaggio macchina hanno IL formato 
MLX (li riconoscete dal fatto che sono 
esclusivamente numerici), c richiedo- 
no quindi che MLX sia caricato In me- 
moria ed eseguito prima della battitu- 
ra del listato, 

MLX vi chiederà llndiriuo delia loca- 
itone di partenza e l'indirizzo della lo- 


cazione finale del programma da cari- 
care. Questi valori sono sempre indica- 
ti nell artìcolo che accompagna il lista- 
to. 

MLX vi segnala automaticamente gli 
errori di battitura MENTRE STATE Di 
CITANDO IL LISTATO, e vi chiede di 
reinserire la linea errata. L’ultimo nu 
mero battuto dì ogni linea rappresenta 
Il checksum e viene visualizzato in re- 
verse. 

Sono inoltre disponibili altri comandi, 
quali: 

SHIFT-N nuovo indirizzo; permette dì 
cambiare l'indirizzo della linea che vo- 
lete battere, ed è utile nel caso si inse- 
riscano ì listati in più parti. 

SHIFT *D display: lista i dati inseriti tra 
due indirizzi di inizio e finca. 


SHIFT-L load: carica un file da nastro o 
disco in formato MLX, 

SH1FT-S save; salva su nastro o disco 
un file In formato MLX. 

Una volta battuto il listato e salvatolo 
tramite MLX, si potrà caricare diretta- 
mente il programma con un'istruzione 
LQAD "nome del file", 1 , 1 per il regi- 
stratore, oppure LQAD "nome del 
file", 8>1 per l'unità a dischi. Il pro- 
gramma sarà mandato in esecuzione 
con una SYS (Indirizzo di partenza). 
Presentiamo in questo numero una 
versione migliorata di MLX per C64 
pubblicato sullo scorso numero, unita- 
mente ad una versione per VIC 20. 

Chi avesse digitato la precedente ver- 
sione può sostituire semplicemente le 
linee del programma che sono state 
modificate. 


MLX versione per VIC 20 


100 PRINT" {CLR) {PUR) *;CHR$ (142) ;CHR$(8) ; 

:r eia IBI 

1Q1 POKE 7 88, 194 : REM DISABILITA RUN/STGP 

: rem 144 

110 PRINT" {RVS J t 14 SPAZI}" : rem 117 

120 PRINT" {RVS} { DES } {OFF }[<*>j£{ RVS ) 

{DBS) t DBS } { 2 SPAZI} [<*>) {OFP}t<*>l 
e(RVS}£{RVSj " : rem 191 

130 PRINT'TRVS} {DES) (<G>) {DES} 

{ 2 DES} [0FF}£{RVS}£[<*>] {OFF} [<*>] 
{RVS} {OFF}" _ : rem 122 

HO PR‘lNT"{RVS}{ 14 SPAZI)" : rem 120 

200 PRINT" { 2 GIU ' } (PUR) (BLK)UN PROGRAMMA 
PER L 1 IN-TRODU2 IONE { 2 SPAZI (DI. ROUT 
INEIN LINGUAGGIO MACCHINA"; : rem 202 
205 PRINT"A PROVA DI ERRORE! 5 GIU'}" 

;rem 226 

210 PRINT" {BLK){ 4 SO} INDIRIZZO DI PARTEN 
ZA" : INPUTS :F«1 -F :C$-CHR$ (31 +1 1 9*F) 

:rem 52 

220 IFS<256ORS>32767THENGOSUB3000:GOTO210 

: rem 2 

225 PRINT; PRINT: PRINT: PRINT :rem 123 

230 PRINT" {BLK}{ 3 SU} INDIRIZZO CONCLUSIV 
O" : INP0TE:P*‘l - F : CS-CHRS (31 +1 1 9*F) 

:rem 170 

J40 IPE< 2 560RE> 32767THENGOSUB3000 : GOTO 2 30 

:rem 234 

250 IFE<5THENPRINTC$;“( RVS) INDIRIZZO CONC 
LUSIVO «INDIRIZZO DI PARTENZA 
{ 3 GIU* ) ":GOSUBl 00(J:GOTO230: rem 27 
260 PRINT; PRINT: PRINT :rem 179 

300 PRINT" {CLR}" ;CHR$ (14) :AD-S : rem 56 
310 PRINTRIGHT3 ( "0000"+MIDS (STR$ (AD} ,2 ) ,5 
FORJ * 1 T06 :rem 234 


320 GOSUB570:IFN--lTHENJ-J+N:GOTO320 

:rem 228 

390 IFN“-21 1 THEN71 0 : rem 62 

400 IFN--204THBN79Q :rem 64 

410 IFN--206THENPRINT:PRINT" {GIÙ* ) INSERIS 
CI UN NUOVO { 4 SPAZlJlNDIRIZZO*; : INPO 
TZ2 “ : rem 42 

415 IPN--206THENIPZZ<SORZZ>ETKENPRINT" 

( RVS } ESCE DAL CAMPO DI VA-" :rem 150 
41 6 IFN=~'506THENIPZZ<SORZZ>ETHENPRINT" 

{RVS) LORI INDICATO" : GOSUB1 000 :GOT041 0 

; cero T05 

417 IFN»-2Q6THENAD-ZZspRINT:G0T031 0 

srem 238 

420 IFNO-196THEN4BO : rem 133 

430 PHI NT ; INPUT 11 L I STATO ; DA" ; F : PRINT , " 

{ 2 SIN] A"; sTnputT ~ :rem 29 

440 I FF< 5QRF>EORT<SQRT > ETHEMPRI NT "M I MIMO” 
;S; "{SIN} , MASSIMO" ; E : GOTO 4 3 0 ** 

: rem 36 

450 FORI ■ FTOTSTEP 6 : PRI NT : PRI NTRI GHT§ ("000 
0 “ +MI D$ ( STR$ ( I ) 1 2 } ,5) ; rem 30 
455 FORK»0TO5:N*PEEK(I'HU :IPIC-3TttENPRlNTS 
PC (10)i * ; rem 34 

457 PRINTRIGHTS [ I, 00*+HID$ f STR$ (N) ,2) f 3] ?" 

t m ì : rea 157 

460 GETAS : I FA$ > * "THE NP RI NT : PRINT : GOT03 1 0 

: rem 25 

470 NEXTK;PRINTCKR$ (20) ; tNBXTI : PRINT sPRJN 
T:GOT031 0 srem SO 

480 IFN<0THENPRINT; GOT03 1 0 : rem 168 

490 A(J) -NsNBXTJ :rem 199 

500 CKSUM" AD-INT ( AD/ 2 56) *2 56 l FORI» 1 TO6 iCK 
SUM» (CKSUM+M I) }AND255:NEXT srem 200 
510 PRINTCHRSna) ; ;G0S0B570 :PRIMTCHR$ (20) 


strame* 19 




: rem 

234 

515 

I PN- CKSUMTKE N 5 3 0 

Erem 

255 

520 

PRINT (PRI NT" LA RIGA E' STATA INSB-R1T 


A IN MANIERA ERRATA" 

: reta 

39 

52 5 

PRI NT "RI -INSERIRLA "(PRINT 

; GOSUB1 000 :G 


OTO310" 

srem 

167 

530 

GOSUB2000 

: rem 

21 B 

540 

PORI* 1 T06 S POKEAD+I - 1 , A( I ) 

sHEXT 




srem 

80 

550 

AD-AD+6 S I FAD<ETHEN3 1 0 

srem 

212 

550 

GOTO? 10 

srem 

108 

570 

N-0S2-0 

: rem 

88 

580 

PRINT” 1<X>] 

srem 

79 

581 

GETAS S I FAS * " "THEN5 81 

srem 

95 

585 

PR1NTCHRS (20) ; :A»ASC(AS) ( 

1PA-130RA-44 


ORA* 3 2THEN6 70 

srem 

229 

580 

IPA> 1 26THENN* -A (RETURN 

srem 

137 

600 

IFA020THEN630 

srem 

TO 

610 

GOSUB690 : IFI*1 ANDT“44THENN“-1 SPRINT" 


{SIN} {SIN}*; (GOTO690 

srem 

172 

620 

GOTO570 

srem 

109 

630 

I PA< 4 SORA > 5 7THENS 8 0 

s rem 

105 

640 

PRINTAS ; (N*N*1 0+A-48 

srem 

106 

650 

IFN>255THENA-20:GOSUBl 000 

SGOTO600 




srem 

229 

660 

Z-Z+l (IFZ<3THEN580 

srem 

71 

670 

IFZ*0 THENGOSUB! 000 (GOTO570 (rem 

114 

680 

PRINT","; (RETURN 

srem 

240 

690 

S%*PEEK (209) +256*PEEK (21 0} +PEEK (21 1 ) 



J rem 

149 

692 

FORI * 1 T03(T* PEEK (Sl-I) 

: rem 

68 

695 

I FT< > 4 4 AN0T< > 5 8THENPOKES t 

-1,32: NEXT 



s rem 

205 


700 PRINTLEFT$ (" { 3 SIN}",I-1) } (RETURN 

: rem 7 


710 PRINT" {CLR} {RVS} *** SAVB •** 

( 3 GII) 1 }■ : rem 236 

720 INPUT" {GIU 1 } HOME DEL FILE"jF$ 

: rem 199 

730 PRI NT : PRI NT" { 2 GIU’ ) tRVSlHtOPPl ASTRO 
O {RVS)D(OPF) 1SCO: (N/D) irem 128 

740 GETAS : I PK$ <>"H ■ ANDAS < > "D "THEN7 4 0 

: rem 30 

750 DV"1-7*(A$“"D") :IFDV*8THENF$**0:"+F$ 

: rem 1 58 

760 TS-FS:ZK-PEEK(53)+256*PEEK<54)-LEN(T$ 
) :POKE782,ZK/256 (rem 3 

762 POKE7B1 , ZK-PEEK (782) *256 (POKE780 , LEN ( 

TS) : SYS 6 54 69 :rem 109 

763 POKE7B0.1 (POKE781 ,DV: POKE7B2 , 1 :SVS654 


MLX nuova versione per C64 


100 PRI NT" (CLR} {CYN}“ ;CHR$ (142) ;CHR$(8) ;( 

POKE5328l,l:POKE5 3280,1 :rem 73 

101 POKE7B8 , 52 (REM DISABILITA RUN/STOP 

:rem B9 

110 PRINT" {RVS ) { 40 SPAZI }"; (rem 176 
120 PRINT" (RVS) ( 15 SPAZI } (DESHOFF) [<*>] 
E ( RVS ) [ DES } (DESH 2 SPAZI }[<*>) tOFF} 
T<*>)£{RVS)£{RVS)Ì 13 SPAZI}"; 

:rem 250 

130 PRINT"{RVSH 15 SPAZI }{0ES H<N>) [<H>] 
{DBS} ( 2 DES} (OFF) £(RVS} £(<*>] (OFF} 
[<*>]£HVS}{ 13 SPAZlT"; ~ (rem 220 
140 PRINT" (RVS}( 40 SPAZI}" (rem 120 

200 PRINT" { 2 GIU’} {POR} UN PROGRAMMA 

{ 3 SPAZI) PER { 3 SPAZI} L’INTRODUZIONE 
DI { 2 SPAZI) ROUTINE IN LINGUAGGIO"; 


66 (rem 69 

765 POKE2S4, S/256 :POKB253,S-PEEK ( 254) *256 

(POKE780, 253 (rem 12 

766 POKE782,E/256 (POKE781 ,B-PEBK (7B2) *256 

(SYS654 96 (rem 124 

770 IP(PEEK(783) ANDl )OR(ST AND1 91 ) THEN780 

(rem 111 

775 PRINT" {GIU' } OPERAZIONE CONCLUSA. " (END 

trem 152 

780 PRINT” {GIU 1 } ERRORE DI REGI S TRA Z IO-NE . 

RIPROVA. "slfÒV-1 THE N7 20 (rem 6 

781 ÒPENl 5,6,15: INPUT#1 5,B1 $,E2$ (PRINTEl $ 

;E2$ (CLOSEl 5: GOTO? 20 (rem 103 

782 GOTO720 (rem 115 

790 PRINT" {CLR} {RVS}*** LO AD «** 

{ 2 GIU' }" ** (rem 212 

800 INPUT* { 2 GIU’} NOME DEL PILB*;F$ 

: rem 21 5 

810 PRINT ì PRINT" { 2 GIO' H RVS} N(OPF) ASTRO 
O {RVS}D{OFF}lSCO: (N/D)"” (rem 127 
820 GETAS : I FA$ < >"N "ANDAS <>"D"THEN8 20 

trem 28 

830 DV-1-7*(A$*"D") (I?DV-8TH£NFS*"0("+F$ 

trem 157 

840 T$*F$ : ZK*PEEK (53) +256*PEEK (54) -LEN (TS 

) (POKE762,ZK/256 (rem 2 

841 POKE781 , ZK-PEEK (782) *256:POKE780, LEN ( 

TS) (SYS65469 srem 107 

845 POKE780 , 1 : POKE781 ,DV:POKE782, 1 (SYS654 
66 trem 70 

850 POKE780, 0:SYS65493 (rem 11 

860 IP ( PEEK (783) ANDl ) OR(ST ANDl 91 ) TKEN870 

srem 111 

865 PRINT" {GIU' }OPBRAZ IONE CONCLUSA. " (GOT 
0310 (rem 142 

870 PRINT" {GIU* {ERRORE DI CARICAMENTO. RI P 
ROVA. (GIU* } *TlFDV*l THEN8Q0 (rem 43 

880 OPEN1 5,8,1 5: INPOTll 5, E1 $,E2S (PRINTEl $ 
;E2$ (CLOSEl 5:GOTO800 (rem 102 

1000 REM CICALINO (rem 231 

1001 POKE3687B, 1 S (POKE36874 ,190 (rem 206 

1002 FORW* 1 TO300 : NEXTW (rem 117 

1003 POKE3687 8, 0:POKE36874 , 0 (RETURN 

(rem 74 

2000 REM CAMPANELLO (rem 130 

2001 FORW-1 5TOOSTEP-1 (POKE36B7B , W: POKE368 

76, 240 (NEXTW (rem 22 

2002 POKE36B76.0: RETURN (rem 119 

3000 PRINTCS;”(RVS}NON IN PAGINA ZERO O 

{ 2 SPAZI} SU ROM{ 4 GIU’ ) " (GOTOl 000 

trem 23 


: rem 217 

205 PRINT" MACCHINA A PROVA) 17 SPAZI) DI 
[ 2 SPAZI )ERROR£{ 3 GIU'}" srem 244 
2L0 PRINT" [<5>) £ 2 SU) INDIRIZZO DI PARTE 
NZA{ 2 SPAZI}"; :INPUTS:F-1-F:C$-CHR$( 
31+I19*F) (rem 85 

220 IFS<256OR{S>40960ANDS<49152)ORS>53247 
THENGOSUB 30 00 : GOTO 210 (rem 235 

225 PRINT: PRINT: PRINT (rem 180 

230 PRINT" [<5>J{ 2 SU) INDIRIZZO CONCLUSI 
VO{ 3 SPAZI}"; ;INPUTE:F*1-F:C$-CHR$(3 
1+119*F) (rem 92 

240 IFE<2560R (E>40960ANDE<49152) ORE>53247 
THENGOSUB 3 0 0 0 : GOTO 2 3 0 :rem 183 

250 IFE<STHENPRINTCS; n (RVS) INDIRIZZO CONC 
LUSIVO< INDIRIZZO INIZIALE" (rem 200 


20 SOPtRVJC* 3«4 


25S IFE<STHENGOSU BIODO : GOTO 2 30 srem 119 
260 PRINTsPRINTs PRINT srem 179 

300 PRINT" {CLR } " ;CHR$ (14 > : AD-S : POKEV+21,0 

srem 225 

310 FRINTRIGHT$r0000"+MID9<STR${AD> ,2) ,5 
) f"s"; SFORJ-1T06 srem 234 

320 GOSUB570 : IFN--lTHENJ-J+N:GOTO320 

: rem 229 

390 IFN--2UTHEN710 irem 62 

400 IFN--204THEN790 srem 64 

410 IFN--2Q6THENPRINT: INPUT" (GIU 1 ì INSERÌ 
RE IL NUOVO INDIRIZZO")ZZ ; rem 13 

414 IFN--256THENIPZZ<S0RZZ>ETHENPRINT" 

[ RVS } ESCE DAL CAMPO DI VALORI INDICAT 
O" tesa 105 

415 IFN»-206THENIFZZ<S0RZZ>ETHENGOSUBlQQ0 

:GOTO410 : rea 202 

417 IFN--206THENAD-ZZ; PRINTSGOTO310 

: rem 233 

420 IFNO-196THEN480 : rem 133 

430 PRINT: INPUT"LISTATO:DA"fF: PRINT" 

{ 9 SPAZI J A" ; i INPUTT : rem 183 

440 IFF<SORF>EORT<SORT>ETHEN PRINT" MIN IMO" 

' fS;" MASSIMO" ; E; "I [< 5>] " sGOT04To 

: rem 147 

450 FORI -FTOTSTEP6 : PRINT i PRINTRIGHTS ("000 

0"+MID$(STR$(I) , 2 ) ,5) : rem 30 

451 FORK-OTOSsN-PEEK (I+K) : PRINTRIGHTS ("00 

"+MID$[STR$(N) ,2) ,3) : rem 66 

460 GETAS : IFAS>""THENPRINT: PRINT SGOTO310 

: rem 25 

470 NSXTK : PRI NTCHRS (20) } iNEXTI i PRINT; PRIN 
T:GOTO310 ireos 50 

480 IFN<0THENPRINT:GOTO310 : rem 168 

490 A(J) -N: NEXTJ : rem 199 

500 CKSUM-AD-INT (AD/256) *256 :F0RI«1T06:CK 
SUM= (CKSUM+A ( I ) ) AND255:NEXT irem 200 

510 PRI NTCHRS (18) ; SGOSUB57Q : PRINTCHRS (20) 

; rem 234 

515 IPN-CKSUMTHEN530 : rem 255 

520 PRINT: PRINT" {RED} LA LINEA E' STATA IN 
SBRITA IN MANIERA* : rem 157 

525 PRINT "ERRATA. RIPETERE (<5>) PRINTtGO 
SUB1000 :G0T03l7 :rem 27 


530 

GOSUB2000 

srem 

218 

540 

FORI * ITO 6 i F0KEAD +1 - 1 , A ( I) : 

NEXT : POKE 5 4 


272,0: POKE54273 f 0 

; rem 

227 

550 

AD = AD + 6 1 1 F AD< ETHEN 3 1 0 

srem 

212 

560 

GOTO710 

uem 

108 

570 

N-0: Z-0 

: rem 

88 

580 

PRINT" [<X>] "j 

S rem 

79 

58L 

GETAS : I FA$ ■ 11 " THEN 5 0 1 

srem 

95 

585 

PRINTCHRS (20} ; :A«ASC(A$) : IFA**13QRA*44 


ORA-32THEN670 

s rem 

229 

590 

IFA>128THENN--A: RETURN 

: rem 

137 

600 

IFAO20THEN630 

srem 

10 

610 

G0SUB69Q s IFI-1ANDT-44THENN 

--1 SPRINT" 


{SIN} (SIN) :GOTO690 

: rem 

172 

620 

GOTO570 

: rem 

109 

630 

IFA<480RA>57THEN580 

s rem 

105 

640 

PRINTAS; :N»N*10+A-48 

: r em 

106 

650 

IFN>255THENA-20:GOSUB1000 s 

GOT06QG 




: r em 

229 

660 

Z-2+llXPZ< 3THEN580 

t rem 

71 

670 

IFZ-0THENGOSUB1000 SGOTO570 

s rem 

114 

680 

PRINT" , ; RETURN 

: rem 

240 

690 

S%“PEEK (209) +256*PEEK{210) +PEEK (211) 



srem 

149 

691 

FORI - 1TO3 ST-PEEK ( S*- I ) 

srem 

67 

695 

IFT< >44ANDT< >58THENPOKBS%- 

1,32 sNEXT 



: rem 

205 


700 PRINTLEFTS (" ( 3 SIN }", I- 1) f : RETURN 

: rem 7 

710 PRINT" {CLR} {RVS}*** SAVE *** 

{ 3 GIU'}" ” : rem 236 

720 INPUT" (GIU' ) NOME DEL FILE"{FS 

srem 199 


730 PRINT; PRINT" { 2 GIU* } {RVS}N(OFF}ASTRO 
O {RVS }D {OFF } ISCO : (N/D)" ;rem 128 
740 GETAS : IFASO"N"ANDASO"D"THEN740 

: rem 30 

750 DV-1-7MA$»"D") : IFDV-8THENFS-*0i "+FS 

:rem 158 

760 TS-FS S ZK-PEEK ( 53 ) +256* PEEK ( 54 ) -LEN (TS 
) : POKE782 , ZK/256 iteti) 3 

762 POKB781, ZK-PEEK (782) *256 : POKE780, LEN ( 

T$ ) : SYS65469 srem 109 

763 POKE780, 1 :POKE781,DVs POKE7B2, 1 sSYS6S4 

66 srem 69 

765 POKE2 54 , S/256 ; POKE253 f S-PEEK (254) *256' 

: POKE780 , 253 srem 12 

766 FOKE782, E/256 : POKE781 ,E-PEEK (782) *256 

:SYS65496 srem 124 

770 IF (PEEK (783) ANDl) OR (ST AND191) THEN780 

srem 111 

775 PRINT" {GIU* }FATTO.":END srem 194 

780 PRINT" {GIU* } ERRORE NEL SAVE-RIPROVAl " 

5lFDV»lTHEN7lO : rem 104 

781 OPENISf 8, 15 s INPUT#15,El$,S2$ : PRINTE1S 

;B2$;CLOSE15:GOTO720 srem 103 

790 PRINT" {CLR} {RVS}*** LQAD *** 

{ 2 GIU ' } " s rem 212 

800 INPUT" { 2 GIU'lNOME DEL FILE";F$ 

srem 215 

810 PRINT: PRINT" { 2 GIU ' H RVS }N{OFF} ASTRO 
O { RVS ÌDlOFF} ISCO; (N/D)" :rem 127 
820 GETAS :IFASO"N"ANDASO"D"THENB20 

sten 28 

830 dv« 1-7MA$-"D"> :IFDV-8THENF$-"0s"+F$ 

srem 157 

840 TS-FS : ZK-PEEK (53) +256*PEEK (54) -LEN (TS 

>: POKE782, ZK/256 : rem 2 

841 POKE781, ZK-PEEK (782) *256: POKE78Q, LEN I 

TS) : SYS65469 srem 107 

845 PQKE78Q, 1: POKE781,DV: POKE782, 1 :SYS654 
66 srem 70 

850 POKE7BO, Q:SYS65493 srem 11 

860 IF (PEEK (783) ANDl) OR (ST AND 191) THEN870 

srem 111 

865 PRINT" {GII)' } FATTO GOTO 3 IO ; rem 184 
870 PRINT" {GIU ' } ERRORE NEL LOAD-RI PETI I 

(GIU* }" : IFDV-1THEN800 ;rem 19 

B80 OPEN15, 8,15: INPUTH5,E1S ,E2$:PRINTE1S 
; E2$ sCLOSElS sGOTOSOO srem 102 

1000 REM CICALINO srem 231 

1001 POKE54296 , 15 SPOKE54277 , 45 : POKE54278 , 

165 srem 207 

1002 POKE54276, 33 : POKE 54 2 7 3, 6: POSE 54 2 7 2, 5 

srem 42 

100 3 FORT-1TO200 sNEXT: POKE54276 , 32; POKE54 
273, 0:POKE54272,0: RETURN S rem 202 

2000 REM CAMPANELLO : rem 130 

2001 POKE54296, 15: POKE54277 , 0 s POKE54278, 2 

47 ;rem 152 

2002 POKE54276, 17 : POKE54273, 40: POKE54272 , 

0 srem 86 

2003 FORT- 1TO100 sNEXT: POKE54 276 , 16 : RETURN 

s rem 57 

3000 PRINTCSi" {RVS} NON IN PAGINA ZERO O 
SU {DESÌ ROM "sGOTOlOOO : rem 240 


sureevic* 21 



Quali sono i pacchetti e i libri di 
informatica più venduti in Italia? 

È proprio vero che tutti vogliono 
un home computer? 

Lotus 1-2-3 è solo una moda? 

Apple II C è veramente 
compatibile con II E? 

Chi copia il software? 

Come fare business con il software? 


A QUESTE 
E MOLTE ALTRE 
DOMANDE RISPONDE 


SoftDealer 


Il primo mensile italiano per chi vende home e personal 
computer» software, libri e accessori di informatica. 
Uno strumento utilissimo per chiunque si interessi di 
personal e home computer. Su Soft Dealer, il nuovo 
mensile della PROGRAM EDITRICE, inviato solo in 
abbonamento, troverete tutte le notizie più utili* recen- 
sioni, test prove di software, articoli dì marketing, clas- 
sifiche dei migliori programmi esistenti sul mercato. 


UN ABBONAMENTO A SoftDealer 

È UN INVESTIMENTO PER IL FUTURO. APPROFITTA 
DELL’ECCEZIONALE OFFERTA DI LANCIO. 
RICEVERAI GRATIS I PRIMI TRE NUMERI DEL 1984, 


Per abbonarsi basterà compilare il modulo pubblicato 
qui sotto, allegando assegno di L. 25.000, e inviarlo a 
PROGRAM EDITRICE S.r.l. Via Melchiorre Gioia, 114 - 
20125 Milano. 

SOFT DEALER «un'idea 

Uffici Tecnici e Commerciali; 
20125 Milano - Via M, Gioia, 114 
T*L (02) 603415 680851 


□ Desidero s ottos cri vere un abbon ame nto a 1 0 n u me- 
ri (L. 25.000) alla rivista SOFT DEALER, da gen- * 
naie a dicembre 1085, 

In questo caso mi saranno inviati in omaggio i 
primi tre numeri del 1984, 

□ Allego assegno di L, 25,000 intestato a PROGRAM 
EDITRICE 

n° , . * * , , » * Banca 

D Ho effettuato pagamento tramite vaglia postale. 

NOME * 

COGNOME * - 

AZIENDA — 


VIA — * — 

CAP. - CITTA" ... 




di M.C. Kees 
trad. e adaiL di 

ti , Man dell l t F. Palazzi O. Calvi 


SOPERVIC è lieta di presentare SUPERBASIC, un 
fantastico programma interamente In linguaggio 
macchina che aggiunge ben 40 (diconal quaranta!) 
nuovi comandi al BASIC del C64. 


C on SUPERBASIC avrete finito di caricare di volta In voi* 
ta ìn memoria il particolare tool che vi serve in una spe- 
cifica occasione: i nuovi comandi che aggiunge si occupa- 
no di tutto: sprite. colorì, grafica in alta risoluzione, musi- 
ca. organizzazione della memoria, etc. Possono essere usa- 
ti sia in modo diretto che da programma, e sono formati 
dal carattere "f più un codice mnemonico di quattro lette- 
re. L unico prezzo da pagare è il non utilizzo del comando 
STOP, che può comunque essere agevolmente sostituito 
dal comando END. Le Istruzioni aggiunte dal SU P ERBA - 
SIC possono essere suddivise in sette categorie principali: 

— standard modificate 
— per il controllo dei suoni 
— per il controllo dei colori 
— per il controllo degli sprite 
» pr il controllo del chip VIC II 
— per l'uso del banco d] memoria 3 
— per il controllo della grafica hi-res 

Mai più quindi lunghe serie di POKE per ottenere un suono 
od un lentissimo plottaggio di una curva in pagina grafica! 
Basta un comando e si ottiene ciò che si vuole con la velo- 
citò dei linguaggio macchina. 

Note per ta battitura di SuperBaalc 

Per caricare SUPERBASIC è necessario usare MLX (vedi in 
altra parte della rivista). Poiché SUPERBASIC viene carica- 
to nel l'area di memoria normalmente occupata dal BASIC 
(previo un suo rilocamento in RAM), bisogna usare un ac- 
corgimento particolare per evitare che SUPERBASIC rico- 
pra una parte ài MLX. La procedura, da seguire attenta- 
mente* è la seguente: 

1) Spegnere e riaccendere il C64 

2) Digitare le seguenti istruzioni e premere RETURN; 

POKE44 t 22: POKE642.22: POKE5632.0; NEW 

3) Caricare in memoria MLX e dare II RUN 
4} Quando MLX chiede gli Indirizzi di partenza e dì fine, di- 
gitare rispettivamente 2049 « 5306 
5) Terminato II lavoro di battitura del SUPERBASIC, usate 
il SAVE delfMLX per registrarlo su nastro o su disco. Se 
non si termina il lavoro In una volta sola, occorre ripetere 
tutta la procedura descritta (punti t*4) t prima di riprendere 
la digitazione. 

Una volta salvato l'intero SUPERBASIC su disco o nastro, 
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potrete richiamarlo In memoria con un normale LOAD, e 
poi dare lì RUN, senza più bisogno delle POKE prima de- 
scritte* 

Utilizzo 

Quando si fa partire il Superbasic, viene copiato il Basic 
dalla ROM nei corrispondenti indirizzi di RAM (SAGOO * 
SBFFF), vengono poi modificati alcuni comandi e vengono 
aggiunte ie routines in linguaggio macchina per la gestio- 
ne di quelli nuovi. Queste routines vengono caricate 
dall'Indirizzo 9C000 all'Indirizzo SCCOO. 

Il Super basic è quindi incompatibile con I programmi che 
risiedono negli stessi indirizzi, può comunque coesistere 
con il DOS 5.1. 

All'Interno del programmi che richiedono 11 Superbasic 
non può essere utilizzato il comando STOP che può essere 
sostituito dal comando END. 

Tutti gli operandi dei comandi Superbasic possono essere 
espressi sia in valore assoluto che usando variabili impo- 
state col valore desiderato. 

Listando un programma contenente comandi Superbasic 
con lo stesso Inattivo, il carattere *T verrà listato come 
STOP. 

Premendo RUN/STOP GESTORE si disabilita 11 Superbasic 
che può essere riattivato con 11 comando: 

POKE 1,54 

COMANDI 

Comandi standard modificati 

RESTQRE: Può essere seguito da un numero di linea o da 
una variabile contenente un numero di linea. 

Questo fa si che una READ eseguita dopo 11 comando "RE- 
STORE n* 1 leggera’ la linea di DATA di numero uguale o su- 
periore ad "n'\ 

LIST: il tasto SHIFT è in grado di Interrompere la visualiz- 
zazione della lista dì un programma sullo schermo finché è 
tenuto premuto. 

GOTO 

GOSUB 

QN: Tutte le possibili forme di scrittura di questi comandi 
ammettono che il numero di linea sia Indicato con una va- 
riabile. 

Es. 10 K- 1000 
20 QOSOB K 

ASC(Sstr): La funzione da come risultato se applicata 
ad una stringa nulla. 

Comandi per 11 controllo dei suoni 

ISSINO (Set up SouND) 

Il comando fSSND produce un suono e ne determina le ca- 
ratteristiche. 

Il volume del suono viene impostato al valore massimo. 
|SSND voce. ad.sr, onda Jreq. [♦pfreq] 
voce Numero della voce usata. Può avere un valore com- 
preso tra 1 e 3 

ad Valori di ATTACK e DECAY. Può assumere un valore 
tra 0 e 255. 

sr Valori di SUSTAIN e RELEA5E. Può assumere un va- 
lore tra 0 e 255. 

onda Definisce la forma d’onda ovvero 11 timbro del suo- 
no, Possono essere definite quattro forme d’onda e per 
ogni forma d'onda 2 valori che fanno partire o fermare II 
suono. 


FORMA D’ONDA 

START 

STOP 

Triangolare 

17 

16 

A dente di sega 

33 

32 

Rettangolare (pulsante) 

65 

64 

Rumore 

129 

126 


freq Definisce la nota, fi suo valore può variare tra 0 e 


65535. 

Far riferimento al "COMMODORE 64 PROGRAMMERÀ 
REFERENCE GUIDE 1 ', appendice E pag, 384 per il valori di 
ogni nota. 

pfreq Va usato in congiunzione alla forma d'onda rettan- 
golare (64/65). Definisce la lunghezza del ciclo di pulsazio- 
ne ovvero la durata della parte positiva dell'onda. Può assu- 
mere un valore tra 0 e 12226. 

NOTA SU AD/SR 

Quando una nota viene emessa, passa da un volume 0 a 
un volume di picco in un certo tempo (controllato da AT- 
TACK). per poi scendere ad una valore di regime (controlla- 
to da SUSTAIN) in un intervallo di tempo (controllato de 
DECAY) e si smorza Infine a volume 0 in un certo tempo 
(controllato da RELEASE). 

I valori dì ATTACK, DECAY e RELEASE determinano una 
durata e variano tra 0 e 15. Vedi tebelllna durate a pag. 198 
del COMMODORE 64 PROGRAMMERÀ REFERENCE 
GUIDE". 

SUSTAIN invece definisce il volume di mantenimento 
della nota rispetto al volume di picco. Varia tra 0 e 15 con 
scala lineare dove 0 significa '"suono assente" e 1 5 "volume 
di picco", 

II valore AD è determinato dalla formula: 

AD - ATTACK * 16 + DECAY 
con formule analoga si determina SR 

SR - SUSTAIN * 16 + RELEASE 

fPLAY 

Il comando [PLAY é una forme abbreviata di [S5ND, va 
usata per modificare la nota. Assume che I valori AD/SR 
siano stati precederla mente impostati dalla [SSND. 

[PLAY vconda, freq[ h pfreq] 

vconda Parametro che definisce sla la forma d onda che 
la voce da usare. Fare riferimento agli operandi VOCE ed 
ONDA della [SSND per i valori ammessi. 

Il contenuto di VCONDA è definito dalla seguente formula: 
VCONDA - ONDA * 256 + VOCE 
freq Definisce la nota. Il suo valore può variare tra 0 e 
65535. Far riferimento ai "COMMODORE 64 PROGRAM- 
MERÀ REFERENCE GUIDE", appendice E pag. 384 per I 
valori di ogni nota. 

pfreq Va usato in congiunzione alla forma d'onda rettan- 
golare (64/65), Definisce la lunghezza del ciclo di pulsazio- 
ne ovvero la durata della parte positiva dell'onda. Può assu- 
mere un valore tra 0 e 12228. 

Comandi par II controllo del colori 

[BKGD (Back GrounD color) 

Il comando [BKGD serve a definire il colore di fondo dello 
schermo. 

[BKGD col 

col Numero fra 0 e 15 che definisce 11 colore 
JEXTC (EXTemal Color) 

Il comando [EXTC serve a definire il colore del bordo dello 
schermo. 

[EXTC col 

col Numero fra 0 e 15 che definisce 11 colore 
[FCOL (Fili COIor memory) 

Il comando [FCGL riempie II buffer video della memoria 
colore con la tinta richiesta. Fa diventare dello stesso colo- 
re tutto lo shermo in high resolution o tutti I caratteri già 
presenti sullo schermo. 

[FCOL col 

col Numero fra 0 e 15 che definisce 11 colore 
JSCRN /SCReeN colors set) 
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Il comando [SCRN serve a definire i colori di fondo* del bor- 
do e dei caratteri in una sola operazione, 
fSCRN bgc,boc,che 

bgc Numero fra 0 e 15 che definisce II colore di fondo 
dell schermo. 

boc Mumero fra 0 e 15 che definisce II colore del bordo 
dello schermo. 

Che Mumero fra 0 e 15 che definisce il colore dei caratteri 
sullo schermo. 

[BKG4 (Back Ground colori) 

Il comando JBKG4 definisce tutti l 4 colori di fondo dello 
schermo usabili In EXTENDED COLOR MODE e MULTI 
COLOR BIT MÀP MODE, 

[BKG4 colO. coll, col2, co!3 
col 0*3 Mumerl fra 0 e 15 che definiscono rispettivamen- 
te N colore di fondo dello schermo (co 10). Il colore back- 
ground 1 (coll), Il colore background 2 (co!2) e il colore dei 
caratteri (coll). 

Per maggiori informazioni vedi I paragrafi MULTI COLOR 
MODE GRAPHICS e EXTEMDED BACKGROUND COLOR 
MODE da pag. 115 a 121 del "COMMODORE 64 PRO 
GRAMMER S REFE RE MCE GUIDE"* 

Comandi per 11 controllo degli sprites 

[D3PR (Define SPRIte) 

Il comando |DSPR è usato per definire le caratteristiche di 
uno aprite* 

[DSPR sp r , b( k , xex p f y exp * xpos, ypos.multi,colj,mcO T md] 
s per Mumero dello sprite definito, può variare tra 0 e 7 
blk Sprlte pointer. Può avere un valore tra 0 e 255. 
Siccome per definire uno sprite occorrono 64 Kbytes (I 
blocco), lo sprlte pointer Indica In quale blocco del banco 
da 16K visibile dal chip di gestione sprlte VIC II risiede lo 
sprite stesso. 

Per esempio, se II VIC 11 punta al banco 1 e blk » 14. lo spri- 
te è definito alla posizione di memoria: 

1 • 16364 * 14 * 64 - 17280 
xexp Espansione orizzontale dello sprite. 

0 * non espanso 

1 *■ espanso 

yexp Espansione verticale dello sprite* 

0 - non espanso 

1 » espanso 

xpos Posizione inziale dell'angolo superiore sinistro deh 
lo sprlte sull'asse orizzontate. 

Può assumere un valore da 0 a 512 (0 a sinistra) 

Fare riferimento alla pag* 143 del "COMMODORE 64 PRO- 
GRAMMERÀ REFEREMCE GUIDE" per I valori che rendo- 
no visibile lo sprite sullo schermo. 

ypos Posizione Iniziale del tango lo superiore sinistro del- 
lo sprite su trasse verticale. 

Può assumere un valore da 0 a 256 (0 In alto) 

Fare riferimento alla pag. 143 del "COMMODORE 64 PRO- 
GRAMMERÀ REFEREMCE GUIDE" per I valori che rendo- 
no visibile lo sprlte sullo schermo* 
multi Definisce se lo aprite è multlcolor oppure di un uni- 
co colore. 

0 - colore singolo 

1 - multlcolor 

Se multi - 1 devono essere definiti anche I parametri op- 
zionali mcO e mcl , 

col Definisce il colore dello sprlte o 11 colore base dello 
sprite se multlcolor* Valore tra Ò e 15 
mcO Definisce LI secondo colore dello sprlte multlcolor. 
Valore Ira 0 e 15 

mcl Definisce li terzo colore dello sprite multicolor. Va- 
lore tra 0 e 15 

Nota sul colore degli sprites 

Sprites di un solo colore: 

I bits In ON dello sprlte assumono il colore definito dal pa- 



rametro col 

I bits in OFF hanno 11 colore di fondo dello schermo* 
Sprites multicolor: 

I bits degli sprite vengono considerati a coppie* Se il valore 
di una coppia è "00" questa assume II colore di fondo dello 
schermo. 

Le coppie di valore “IO" assumono il colore definito dal pa- 
rametro col. Le coppie di valore "01" e “11" assumono ri- 
spettivamente I colori definiti nel parametri mcO e mcL 

[ESPR (Enable SPRlte) 

II comando |ESPR serve per abilitare lo sprlte ovvero a ren- 
derlo visibile. 

|ESPR spr 

spr Mumero dello sprlte che si vuole abilitare. Può varia- 
re tra 0 e 7 

[KSPR (KIII SPR Ite) 

Il comando [KSPR serve per disabilitare lo sprlte ovvero a 
renderlo Invisibile. 

[KSPR spr 

spr Mumero dello sprite che si vuole disabilitare* Può va- 
riare tra 0 e 7 

[BSPP ( Bac kg re und/SPr Ite Prlorlty) 

Il comando [BSPP serve a definire la priorità dì uno sprite 
rispetto al "fondo”, ovvero definisce se uno sprlte Passerà 
"dietro" ai caratteri dello schermo oppure "davanti". 
[BSPP spr.sel 

spr Mumero tra 0 e 7 che definisce lo iprite, 
sei Priorità dello sprite rispetto al background, 

0 - lo sprlte ha priorità maggiore e nasconde i ca- 
ratteri 

1 » lo sprlte ha priorità più bassa e ne è nascosto 
(MOVE (MOVE sprite) 

Il comando [MOVE serve a muovere lo sprite sullo scher- 
mo. 

[MOVE spr,xpos t ypos 

spr Mumero tra 0 e 7 che definisce lo sprlte. 
xpos Posizione dell'angolo superiore sinistro dello sprite 
sull'asse orizzontale* 

Può assumere un valore da 0 a 512 (0 a sinistra) 

Fare riferimento alla pg, 143 del "COMMODORE 64 PRO- 
GRAMMERÀ REFEREMCE GUIDE” per I valori che rendo- 
no visibile lo sprlte sullo schermo* 
ypos Posizione dell'angolo superiore sinistro dello sprite 
sull'esse verticale. 

Può assumere un valore de 0 a 256 (0 in alto) 

Fare riferimento alla pag. 143 del "COMMDORE 64 PRO- 
GRAMMERÀ REFEREMCE GUIDE" per i valori che rendo- 
no visibile lo sprite sullo schermo. 

Comandi per 11 controllo del chip VIC 11 

Il chip VIC II può vedere solo 16K di memoria per volta, la 
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memorie è perciò divisa in 4 banchi di 16K ciascuno. 
Normalmente II chip accede ai primi 16K. ovvero ai banco 
“ 0 ", 

Ali interno del banco selezionato, può essere definito quale 
blocco da I K costituisce la memoria dello schermo (buffer 
video), normalmente il blocco M l*\ 

Il chip VIC 11 deve inoltre selezionare IJ blocco da 2K che de- 
finisce il CHARACTER SET disponibile. 

[BANK (define BANK) 

Il comando [BANK definisce quale banco di memoria è vi- 
sibile al VIC II, 

JBANK sei 

sei Numero che Indica il blocco. Può variare tra 0 e 3 
(VS1K (video Screen 1K> 

Il comando JVSKì determina quale dei 16 blocchi da 1K, 
disponibili all interno di un banco, viene usato per il buffer 
video. 

[VSlKsel 

sei Numero che indica il blocco. Può variare tra 0 e 15. 
|CB2K (Chorscter Block 2K) 

Il comando [CB2K seleziona quale degli 8 blocchi da 2K, 
disponibili all'Interno di un banco, viene usato per 11 cha- 
rme ter set. 

[CBSK sei 

sei Numero che indica il blocco. Può variare tra 0 e 7. 

NOTA: [CBSK è usato anche per selezionare quale dei 2 
blocchi da 8K disponibili è usato per la BIT MAP SCREEN 
memory, 

1 valori di SEL da 0 a 3 selezionano il primo blocco mentre i 
valori da 4 a 7 selezionano it blocco superiore. 

I 3 comandi [BANK, [VS1K e [CB2K vanno usati insieme e 
in modo coordinato, facendo attenzione nel selezionare I 
blocchi usati. Il sistema può “cadere’* se si selezionasse (ad 
esempio) per la memoria video la pagina "0" ($0000- 
$0400). Anche I banchi "2" e ''3" devono essere utilizzati 
con cautela. 

Spostando la memoria video, si può abbassare l'entry point 
dei programmi Basic da $0800 e $0400 guadagnando f K. 

Comandi per l'uso del BANCO 3 

Quando viene selezionato il banco 3. il VIC 11 vede la RAM 
dall’indirizzo $COOO al l'indirizzo $FFFF, ignorando la ROM 
di pari indirizzo che è però indispensabile al Basic, 

II Superbask permette l’uso del banco 3 per allocarvi la 
memoria video ("[VS1K 3" dall'Indirizzo $CCO0 che è quel- 
lo successivo al massimo indirizzo occupato dal Superba 
sic). La RAM da $D0QG può essere usata per character set. 
definizione sprltes, bit map screen memory, etc. Per usare 
questi Indirizzi bisogna abilitare, usare e disabilitare le 
RAM. 

|HRAM (High RAM usage) 

Il comando [HRAM permette che altri comandi Superbask 
possano essere eseguiti usando il banco 3 di memoria. 
|HRAM supcom [pararti) 

supcom È un qualsiasi comando Superbask ad eccezio- 
ne dei comando [MXGR, 

pararti è la lista dei parametri richiesti dal comando 
“supcom", 

1STCJF (STore in core) 

li comando |$TUF è un equivalente della POKE e funziona 
esattamente allo stesso modo. A dìffernza della POKE, può 
essere eseguito nel banco 3 come "subco m" del comando 
[HRAM. 

[STUF I oc, vai 
IHRAMLOOK loc. vai 


loc È la posizione di memoria dove viene messo il dato 

"vai”, 

vai È il dato da mettere nella posizione di memoria "loc", 
[LOOK (LOOK in core) 

IL comando [LOOK è un equivalente della PEEK; ha però 
una sintassi diversa perché richiede l'uso dì una variabile 
dove mettere II valore estratto dalla memoria. Può essere 
eseguito nel banco 3 come "subcom" del comando [HRAM. 
ILOGK joc, vai 
IHRAMiOGK loc, vai 

loc È la posizione di memoria da dove viene prelevato il 
dato "vai". 

vai È la variabile nella quale viene messo II dato preleva- 
to dalla memoria "loc". 

Comandi per II controllo della grafica 

(ECGR (Extended Color mode GRaphic) 

Il comando [ECGR seleziona la gestione della grafica in ex- 
tended color mode, 

[ECGR switch 

swltch Abìlitazionekfisabi stazione extended color mode 

0 - disabilitato 

1 ■ abilitato 

[MCGR (Multi Color mode GRaphic) 

Il comando JMCGR seleziona la gestione della grafica in 
multi color mode. 

[MCGR swilch 

swltch Abilltazione/dfsabi Illazione multi color mode 

0 - disabilitato 

1 m abilitato 

(BMGR (Bit Map mode GRaphic) 

Il comando (BMGR seleziona la gestione delta grafica In bit 
map mode, 

|BMGR swltch 

swltch Abilitazlone/disabi illazione bit map mode 

0 - disabilitato 

1 * abilitato 

NOTA: [BMGR e [MCGR possono essere usati insieme per 
ottenere un bit map graphics in multi color mode. 

[ECGR e [BMGR, se usati insieme, mettono a blank lo 
schermo velocizzando l'esecuzione dei programmi. 

[OLCS (DownLoad Character Set) 

U comando [DLC5 serve a copiare in RAM 11 character set. 
Possono essere copiati i caratteri minuscoli, maiuscoli o 
entrambi. 

[DLCS set .addr 

set Indica il character set da copiare: 

0 ■ set maiuscolo 

1 » set minuscolo 

2 - entrambi I set s 

addr È lindi rizzo di partenza del nuovo character set. 
Deve essere allineato ai 2K, a meno che non si desideri 
cambiare lordine di definizione dei caratteri al l’Interno del 
set. 

Osando addr - 53248 il set sarà copiato nella RAM sotto- 
stante Il character set standard In ROM nel BANCO 3. 
Potrà essere modificato con l'uso della [HRAMSTCJF. 

[FBMS (Fili Bit Map Screen) 

Il comando [FBMS va usato in BIT MAP MODE. Riempie il 
buffer video high resoJutlon con la configurazione di blts 
prescelta. 
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[FBMS byte 

byte È una variabile contenente un valore numerico tra 0 
e 255 o fi numero stesso, 

[FSCR (Flit SCRecn) 

fi comando [FSCR riempie I) buffer video con II carattere 
specificato. Può essere usato anche in BIT MAPE MODE 
dove la memoria video serve a determinare il colore dello 
schermo high resolution. 

(FSCR byte 

byte È una variabile contenente la rappresentazione 
ASCII del carattere da mettere sul video o che definisce II 
colore da usare* oppure il numero stesso* 

|PLQT (PLOT pixel) 

li comando [PLOT va usato In BIT MAPE MODE* rende visi* 
bile uno dei 320 * 200 punii dello schermo* 

(PLOT xpos.ypos 

xpos Posizione del punto sull'asse orizzontale. Può avere 
un valore tra 0 e 319. 

ypos Posizione del punto sull'asse verticale* Può avere 
un valore tra 0 e 199* dove "0” è II primo "raster" (riga 
scandita dal pennello elettronico) In alto. 

(CLPX (CLeer PIXel) 

Il comando [CLPX va usato In BIT MAPE MODE, cancella 
uno dei 320 * 200 punti dello schermo. 

[CLPX xpos. ypos 

xpos Posizione del punto sull'asse orizzontale* Può avere 
un valore tra 0 e 319. 

ypos Posizione dei punto sull'asse verticale. Può avere 
un valore tra 0 e 199, dove "0" £ il primo "raster" (riga 
scandita dal pennello elettronico) in alto* 

fFLJP (FUP flop pixel) 

Il comando [FUP va usato in BIT MAP MODE, cambia lo 
stato di uno del 320 ■ 200 punti dello schermo ovvero se è 
visibile lo rende invisibile e viceversa* 

[FUP xpos, ypos 

xpos Posizione del punto sull'asse orizzontale. Può avere 
un valore tra 0 e 319* 

ypos Posi zio ne del punto sull'asse verticale* Può avere un 
valore tra 0 e 199* dove "0" è II primo "raster* (riga scandi' 
ta dal pennello elettronico) in alto. 



giallo con 

[BKGD7 

Il comando 

— [MCPL 30,40,0 genera un pixel giallo (invisibile) 

— MCPL 40,50* 1 genera un pixel nero 0000 

— (MCPL 50,60*2 genera un pixel bianco 0001 

— [MCPL 70,80*3 genera un pixel blu 

[DRAW (DRAW linea) 

Il comando [DRAW £ usato in BIT MAP MODE (anche mul- 
ticelo r) per disegnare o cancellare un segmento sullo 
schermo. 

[DRAW type, xpos 1, ypos l,xpos2,ypos2 
type Opzione di scrittura o di cancellazione 

0 - cancellazione 

1 - scrittura 

xposl Posizione del punto di inizio del segmento sull'as- 
se orizzontale. Può avere un valore tra 0 e 319. 

yposl Posizione del punto di inizio del segmento sudas- 
se verticale* Può avere un valore tri 0 e 199. 

xposl Posizione del punto di fine del segmento sull'asse 
orizzontale. Può avere un valore tra 0 e 319* 
ypos 2 Posizione del punto di fine del segmento sull'asse 
verticale. Può avere un valore tra 0 e 199* 

[HRCS (High Resolution Character Set) 

Il comando [HRCS memorizza l'indirizzo di inizio del cha- 
rader set da usare In BfT MAP MODE. 

N character set può anche non essere allineato al 2K e può 
essere il character set standard, in quest'ultimo caso lindi' 
rizzo deve essere 53248 che seleziona 11 character set 
MAIUSCOLO in ROM. 

[HRCS addi 

addf Indirizzo di In zio del character set 


[MCPL (Multi Color PLot pixel 

Il comando [MCPL va usato In multlcolor BIT MAP MODE* 
e definisce II colore e la posizione di uno del 160 * 200 
punti dello schermo. 

|MCPL xpos* ypos .sei 

xpos Posizione del punto sulfasse orizzontale. Può avere 
un valore tra 0 e 1 59. 

ypos Posizione del punto sull'asse verticale* Può avere 
un valore tra 0 e 199* dove "0" è II primo "raster"' (riga 
scandita dal pennello elettronico) in alto* 
sei Può avere un valore tra 0 e 3 con 1 seguenti significa' 

ti: 

0 « colore del background screen 

1 - colore definito nel semibyte di destra del buffer vi' 
deo 

2 » colore definito nel semlbyte di sinistro del buffer vi- 
deo 

3 - colore definito nel buffer colore video* 

Esemplo: Il buffer video è stato riempito con 

[FSCR 16 

ovvero ' semibyte di sinistra - 1 - bianco 
* semlbyte di destra - 0 - nero 
11 buffer colore video è stato riempito di colore blu con 
[FCOL6 

Jl colore di sfondo dello schermo £ stato impostato a 


[CODE (CODE character In screen code) 

Il comando [CODE permette di tradurre una stringa dalla 
codifica ASCII a quella SCREEN DISPLAY CODE, che è la 
codifica usata dai comandi [CHAR e [CHRX per scrivere dei 
caratteri sullo schermo In bit map mode. 

[CODE stri 

str 3 E il nome di una variabile che contiene la stringa da 
convertire. Dopo l’esecuzione il contenuto della stringa è In 
SCREEN CODE e non più In ASCII: va quindi salvata prima 
se si vuole riutilizzarla, 

I caratteri di controllo RVS-ON e RVS- OFF possono essere 
usati nella stringa per selezionare il set maiuscolo (OFF) o 
il set minuscolo (ON). 

Ogni altro carattere di controllo non deve essere usato nel- 
la stringa perché può dar luogo a risultati imprevedibili. 

[CHAR (write CHARacter in bit map mode) 

II comando [CHAR permette di scrivere un carattere sullo 
schermo in bit map mode* 

[CHAR byte.xpos T ypos 

byte È la rappresentazione In screen code del carattere 
da mettere sullo schermo* come specificato net l'appendice 
B di pag. 376 del "COMMODORE 64 PROGRAMMERÀ RE* 
FERENCE GUIDE”. La variabile byte può essere ottenuta 


StPERVIC* vé4 27 


facendo, una dopo Filtra, le necessarie [CODE delle M(D$ 
sulla strìnga orìgine. 

xpos È la posizione sudasse orizzontale dell'angolo su- 
periore sinistro della matrice carattere. 

ypos È la posizione sudasse verticale dell'angolo supe- 
riore sinistro deda matrice carattere. 

|CHRX (write CHaRacter In bit map mode wlth eXcluslve 
OR) 

11 comando |CHRX permette di scrivere un carattere sudo 
schermo In bit map mode facendo exclusive OR con quan- 
to già esistente sullo schermo In quelle posizione. Può per- 
ciò essere utilizzato per cancellare un carattere già presen- 
te sullo schermo. 

[CHRX byte, xpos, ypos 

byte È la rappresentazione In screen code del carattere 
da mettere sudo schermo, come specificato neirappendlce 
B di pag. 376 del COMMODORE 64 PROGRAMMERÀ RE- 
FERENCE GUIDE'". La variabile byte può esere ottenuta fa- 
cendo, una dopo l'altra, le necessarie [CODE delle MID$ 
suda stringa orìgine. 

xpos È la posizione sudasse orizzontale de) Tango lo su- 
periore sinistro della matrice carattere. 

ypos È la posizione sull'asse verticale dell'angolo supe* 
rio re della matrice carattere. 

[MXGR (MiXed mode Graphic set-up) 

Il comando [MXGR crea una interrupt routine che consente 
di gestire contemporaneamente lo schermo In 2 modi gra- 
fici diversi. 

Ogni volta che 11 "raster reglster" (il registro che conta le ri* 
ghe orizzontali pennellate sudo schermo) eguagli uno del 
valori indicati, viene chiamata la interrupt routine che so- 
stituisce il valore Indicato In un registro dei chip V1C IL 
Ricordare che la parte visibile dello schermo va dal raster 
51 at raster 25L 

[MXGR reg, mask. rastl, va II ,rast2, va 12 
reg È uno del registri del VIC IL II registro è indicato 
dahlndirlzzo all'Interno del chip. Siccome l'Indirizzo inizia- 
le del chip é 53246 e ad esemplo l'indirizzo del registro che 
controlla il colore di fondo dello schermo è 53261 , l'ope- 
rando reg in questo caso è ,f 33" (53281 ^53248). 

mask Controlla quali bit del registro vengono modificati. 
Può avere un valore tra 0 e 255. 

I bit del registro che vengono modificati sono queld corri- 
spondenti al bit In OFF deda maschera (mask). 

Per esempio la maschera "240" ((SFQ) — (1 11 10000)) per- 
mette la modifica del solo semi byte di destra del registro. 

rastl Primo valore di raster per II quale viene attivata 
Tlnternjpt routine. 

vai 1 Valore che viene Inserito nel bit del registro (reg) 
corrispondenti ai bit in off della maschera (mask) quando il 
raster reglster eguaglia II valore specificato In rastl . 

rast2 Secondo valore di raster per II quale viene attivata 
Tinterrupi routine. 

vai 2 Valore che viene Inserito nel bit del registro (reg) 
corrispondenti al bit In off della maschera (mask) quando il 
raster reglster eguaglia 11 valore specificato in rast2. 
Esempio: L'Istruzione 

[MXGR 33,240.152,10,252,0 

farà si che 11 fondo dello schermo (reg » 33) risulti nero nel- 
la metà superiore (raster 151) e rosa neda metà inferiore 
(raster 152 al raster 251). 

Nota: La tempo ri zzaz Ione delHnterrupt routine può essere 
Imprecisa perché la interrupt routine standard (IRQ) è sem- 
pre attiva. Ciò può causare delle ondulazione sulla linea di 
separazione fra I ''modi" delio schermo. Per mantenere 
questa linea precisa occorre disabilitare la IRQ perdendo 
cosi d controllo sulla key board e limitando \VO al solo joy- 
stick. 

[CMXV (Change MiXed graphic mode Values) 


Il comando |CMX V permette di variare dinamicamente I va- 
lori da inserire nel registro mentre la interrupt routine crea- 
ta dalla [MXGR è attiva. 

[CMXV vai Lval2 

vali Valore che viene Inserito nel bit del registro (reg) 
corrispondenti ai bit In off della maschera (mask) quando il 
raster reglster eguaglia il valore specificato in rastl. 

val2 Valore che viene inserito nel bit del registro (reg) 
corrispondenti al bit In off della maschera (mask) quando il 
raster register eguaglia II valore specificato In rast2. 

[KMXG (Kilt MiXed Graphic mode) 

Il comando [KMXG disabilita Hnlemipt routine creata dalla 
[MXGR lasciando il registro In uno stato Indeterminato. Per 
forzare 11 valore voluto nel registro usare prima la [CMXV, 
Non ha operandi. 

[KMXG 

I due comandi che seguono utilizzano la possibilità delHn- 
tegrato VIC IT di eseguire lo scroi ling lento dello schermo 
video sia in orizzontale che in verticale. 

Questo tipo di movimento viene effettuato spostando lìn- 
tero schermo lateralmente o verticalmente di un solo pun- 
to per volta. Lo scrolling lento ha però come requisito la ri* 
dazione dello schermo nella direzione del movimento. 

Per fare uno scrolling verticale lo schermo visibile deve es- 
sere portato da 25 a 24 righe, e per uno scrolling orizzonta- 
te da 40 a 38 caratteri per riga. 

[S1ZE (Screen SI2E) 

II comando [SIZE permette di selezionare 11 numero di ri- 
ghe e/o colonne che ai vogliono visibili sullo schermo. 

jSIZE colse!, rowsei 

colse! Seleziona il numero di colonne visibili sullo scher- 
mo. 

0-38 colonne 
l - 40 colonne 

rowsel Seleziona il numero di righe visibili sullo scher- 
mo, 

0-24 righe 
I - 25 righe 

[XYSC (X*Y Setoli) 

Il comando [XYSC muove l'intero schermo orizzontalmen- 
te e/o verticalmente da ì a 7 pixel per volta. 

Normalmente viene utilizzato lo spostamento di \ pixel alla 
volta per realizzare lo scroti lento. 

[XYSC xval.yvai 

xv al Può assumere un valore tra 0 e 7. 

Variando ad esempio il valore tra 0 e 7 o tra 7 e 0 lo scher- 
mo può essere mosso di un pixel alla volta rispettivamente 
verso l'alto o verso 11 basso. 

yval Può assumere un valore Ira 0 e 7. 

Variando ad esempio il valore tra 0 e 7 o tra 7 o 0 lo scher- 
mo può essere mosso di un pixel alla volta rispettivamente 
verso sinistra o verso destra. 

Esiste inoltre li comando [CÀTA che lista sullo schermo 
tutti I nuovi comandi del SGPERBASIC. 

[CÀTA (CAIA log of commend) 

[CAIA 

Non ha operandi. 

SUPERBASIC per C64 

204 9 :0U, 008, 000 ,000, 158,050,228 
2055 : 04 8, 056, 04 B, 000, 000, 000, 159 
2061 : 000, 000, 000, 000,000,000,013 
2067 : 000, 000, 000, 000,000,000,019 
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2073 : 000, 000 » 000 / 000 , 000 , 000, 025 
2079 : 000 , 169 , 039 , 133 , 001 , 169,030 
2085 r 000 , 133 , 020 , 133 , 078 , 169, 058 
2091 ì 009 , 133 , 021 , 169 , 192 , 133, 188 
2097 : 079 , 162 , 012 , 160 , 000 , 177, 127 
2103 : 0 20 , 145 , 078 , 200 , 208 , 249, 187 
2109 : 230 , 021 , 230 , 079 , 202 , 208, 007 
2115 : 242 , 160 , 008 , 169 , 104 , 032, 014 
2121 : 030 , 171 , 169 , 013 , 141 , 119, 204 
2127 : 002 , 141 , 120 , 002 , 169 , 002, 003 
2133 : 133 , 198 , 169 , 033 , 141 , 001, 248 
2139 : 008 , 169 , 020 , 141 , 002 , 008, 183 
2145 : 076 , 120 , 008 , 000 , 000 , 000, 04 5 
2151 : 000 , 031 , 147 , 017 , 017,04 8, 107 
2157 : 017 , 157 , 082, 0 85 , 078 , 019, 035 
2163 ; 0 00 , 000 , 000 , 000 , 000 , 169,028 
2169 : 000 , 133 , 020 , 169 , 160 , 133,224 
2175 : 021 , 162 , 032 , 160 , 000 , 177, 167 
2101 : 0 20 , 145 , 020 , 136 , 208 , 249, 143 
2187 : 230 , 021 , 202 , 208 , 244 , 162, 182 
2193 : 000 , 160 , 003 , 185 , 224 , 160, 109 
2199 : 157 , 224 , 160 , 232 , 200 , 224,068 
2205 : 190 , 208 , 244 , 169 , 003 , 141,088 
2211 : 161 , 168 , 169 , 192 , 141 , 162, 132 
2217 : 168 , 169 , 074 , 141 , 210 , 166, 073 
2223 : 169 , 193 , 141 , 211 , 166 , 141, 172 
2229 : 037 , 160 , 169 , 084 , 141 , 036,040 
2235 : 160 , 169 , 219 , 141 , 223 , 160, 235 
2241 : 169 , 255 , 141 , 04 4 , 160 , 169, 107 
2247 : 194 , 141 , 045 , 160 , 169 , 038, 178 
2253 : 133 , 001 , 169 , 005 , 141 , 143, 029 
2259 : 183 , 169 , 076 , 141 , 043 , 169, 224 
2265 : 141 , 087 , 169 , 169 , 193 , 141, 093 
2271 : 045 , 169 , 141 , 089 , 169 , 169, 237 
2277 : 200 , 141 , 088 , 169 , 169 , 227, 199 
2283 : 141 , 044 , 169 , 096 , 000 , 000, 173 
2289 : 000 , 000 , 000 , 000 , 000 , 000, 241 
2295 : 000 , 000 , 000 , 000 , 000 , 000,247 
2301 : 000 , 000 , 000 , 032 , 115 , 000, 144 
2307 : 032 , 158 , 173 , 032 , 247 , 183,060 
2313 : 096 , 032 , 139 , 192 , 032 , 000, 244 
2319 : 192 , 165 , 020 , 166 , 002 , 157, 205 




232 5 ; 248 , 007 , 032 , 000 , 192 , 165,153 
2331 : 020 , 162 , 029 , 032 , 162 , 192,112 
2337 : 032 , 000 , 192 , 165 , 020 , 162, 092 
2343 : 023 , 032 , 162 , 192 , 032 , 097, 065 
2349 : 192 , 032 , 000 , 192 , 165 , 020, 134 
2355 ì 072 , 162 , 028 , 032 , 162 , 192, 187 
2361 : 032 , 000 , 192 , 165 , 020 , 166,120 
2367 : 002 , 157 , 039 , 208 , 104 , 240,045 
2373 : 117 , 032 , 000 , 192 , 165 , 020, 083 
2379 : 141 , 037 , 208 , 032 , 000 , 192,173 
238 5 : 165 , 020 , 141 , 038 , 208 , 169,054 
2391 ìOOl , 162 , 021 , 032 , 162 , 192,145 
2397 : 096 , 032 , 139 , 192 , 032 , 000, 072 
2403 : 192 , 165 , 021 , 072 , 165 , 020, 222 
2409 : 072 , 032 , 000 , 192 , 165 , 002,056 
2415 : 010 , 170 , 232 , 165 , 020 , 157, 097 
2421 : 000 , 208 , 202 , 104 , 157 , 000, 020 
2427 : 208 , 104 , 162 , 016 , 032 , 162, 039 
243 3 : 192 , 169 , 000 , 141 , 030 , 208,101 
2439 : 141 , 031 , 208 , 096 , 032 , 000, 131 
24 4 5 : 192 , 165 , 020 , 041 , 007 , 133, 187 
24 51 : 0 02 , 170 , 169 , 001 , 224 , 000,201 
24 57 : 240 , 004 , 010 , 202 , 208 , 252,04 5 
2463 : 133 , 078 , 096 , 164 , 078 , 201, 141 
2469 ; 000 , 240 , 006 , 152 , 029 , 000, 080 
2475 : 208 , 208 , 006 , 152 , 073 , 255,049 
2481 : 061 , 000 , 208 , 157 , 000 , 208,04 3 
24 87 : 096 , 000 , 007 , 014 , 032 , 019,095 
2493 : 199 , 240 , 150 , 032 , 000 , 192,234 
2499 : 165 , 020 , 041 , 003 , 170 , 189,015 
2505 : 183 , 192 , 133 , 078 , 169 , 212, 144 
2511 : 133 , 079 , 032 , 000 , 192 , 165,040 
2517 ; 020 , 160 , 005 , 145 , 078 , 032, 141 
2523 : 000 , 192 , 165 , 020 , 160 , 006,250 
2 529 : 145 , 078 , 032 , 028 , 193 , 165,098 
2535 : 020 , 133 , 002 , 160 , 004 , 145,183 
2541 : 078 , 032 , 03 7 , 193 , 169 , 015,249 
2547 : 141 , 024 , 212 , 096 , 032 , 000, 236 
2553 : 192 , 165 , 020 , 041 , 003 , 170, 072 
2559 : 189 , 183 , 192 , 133 , 078 , 169, 175 
2 565 : 212 , 133 , 079 , 165 , 021 , 133, 236 
2571 : 002 , 169 , 000 , 160 , 004 , 145, 235 
2 577 : 078 , 032 , 037 , 193 , 165 , 002, 012 
2583 : 160 , 004 , 145 , 078 , 096 , 169, 163 
2589 : 000 , 160 , 004 , 145 , 078 , 076, 236 
2595 : 000 , 192 , 032 , 000 , 192 , 165,104 
2601 : 021 , 160 , 001, 14 5 , 078 , 165, 099 
2607 : 020 , 136, 14 5 , 078 , 165 , 002 , 081 
2613 : 201 , 065 , 208 , 016 , 032 , 000,063 
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2619 : 192, 165, 021 ,041, 015 ,160,141 
262 5 : 003, 145, 078, 165, 020, 136,100 
2631 ;145, 078, 096, 173, 141,002, 194 
2637 : 208, 251, 076, 04 4, 168, 076,132 
2643 :029,168,240,251,032,003,038 
2649 : 192, 032, 019, 166, 056, 165, 207 
2655 : 095, 233, 001, 164, 096, 176, 092 
2661 : 001, 136, 133, 065, 132, 066, 122 
2667 ; 096, 032, 000, 192, 160, 000,075 
2673 : 177, 020, 133, 002, 032, 115, 080 
2679 :000, 032,040,175, 164,002,020 
2685 ì 169,000,032,145,179,166,048 
2691 :0.71, 164,072,032,215, 187, 104 
2697 : 096, 032, 000, 192, 165, 020, 130 
2703 : 133, 078, 165,021,133,079,240 
2709 : 0 32, 000, 192, 165, 020, 160, 206 
2715 :000, 145,078,096, 173,014,149 
2721 :220, 041,254, 141,014,220, 027 
2727 : 165, 001, 041, 2S3, 133, 001, 249 
2733 :169, 193,072,169, 184,072,008 
2739 :032,115,000,076,000,195,065 
2745 :165, 001,009,002, 133,001, 240 
2751 5173,014,220,009,001,141,237 
2757 5014,220,096,165,101,133,158 
2763 5254,104,133,002,198,254,124 
2769 5208,005,165,002,076,239,136 
2775 5167,032,000,192,032,121,247 
2781 5000,201,044,240,237,096,015 
2787 5032,121,000,201,137,208,158 
2793 :003,076,055,169,201,141,110 
2799 :240,249,076,050, 169,000,255 
2805 5000,000,000,000,000,000,245 
2811 5000,000,000,000,000,077,072 
2817 5079,086,069,093,192,068,076 
2823 5083,080,082,101,196,083,120 
2829 5083,078,068,191,192,080,193 
2835 5076,065,089,246,192,066,241 
2841 5075,071,068,056,195,069,047 
2847 5088,084,067,065,195,075,093 
2853 5083,080,082,074,195,069,108 
2859 5083,080,082,084,195,066,121 
2865 5083,080,080,092,195,083,150 
2871 5084,085,070,137,193,069,181 
2877 5067,071,082,125,195,077,166 
2883 ;067,071,082,150,195,066,186 
2889 5077,071,082,175,195,083,244 
2895 :073,090,069,187,195,088,013 
2901 5089,083,067,211,195,067,029 
2907 :065,084,065, 250, 195, 066, 048 
2913 5065,078,075,053,196,086,138 
2919 5083,049,075,113,196,067,174 
2925 :066,050,075,151,196,068,203 
2931 5076,067,083,172,196,077,018 
2937 5088,071,082,065,197,075,187 
2943 :077,088,071,180,197,067,039 
2949 5077,088,086,200,197,070,083 
2955 5067,079,076,217,197,080,087 
2961 5076,079,084,130,198,070,014 
2967 5076,073,080,122,198,067,255 


2973 5076,080,088,138,198,077,046 
2979 5067,080,076,148,198,070,034 
2985 50B3, 067, 082,197, 198, 070, 098 
2991 5066,077,083,232,198,068,131 
2997 5082,065,087,097,199,072,015 
3003 5082,067,083,060,201,067,235 
3009 5072,065,082,134,202,067,047 
3015 5072,082,088,142,202,067,084 
3021 ;079,068,069,150,202,076,081 
3027 5079,079,075,107,193,066,042 
3033 5075,071,052,105,195,072,019 
3039 5082,065,077,158,193,083,113 
3045 5067,082,078,176,203,255,066 
3051 '.255,255,255,255,255,255,229 
3057 s 255, 255,255,255, 255,255,235 
3063 : 2 55, 255, 255, 255, 255, 255, 241 
3069 : 255, 197, 200, 162, 000, 134,177 
3075 : 002, 160, 000, 177, 122, 221, 173 
3081 1000,194,208,026,232,200,101 
3087 :192,004,208,243,189,001,084 
3093 :194,072,189,000,194,072,230 
3099 1165,122,024,105,003,133,067 
3105 1122,144,002,230,123,096,238 
3111 1165,002,024,105,006,133,218 
3117 1002,170,189,000,194,201,033 
3123 :255,208,206,076,008,175,211 
3129 1032,000,192,165,020,141,095 
3135 1033,208,096,032,000,192,112 
3141 :165,020,141,032,208,096,219 
3147 1032,139,192,169,000,162,001 
3153 1021,076,162,192,032,139,191 
3159 1192,162,021,076,162,192,124 
3165 1032,139,192,032,000,192,168 
3171 1165,020,162,027,076,162,199 
3177 1192,162,000,134,002,032,115 
3183 :000,192,165,020,166,002,144 
3189 1157,033,208,232,224,004,207 
3195 1208,239,096,032,000,192,122 
3201 1165,020,162,017,160,064,205 
3207 1032,164,192,165,020,240,180 
3213 1239,169,000,162,022,160,125 
3219 :016,076,164,192,032,000,115 
3225 1192,165,020,162,022,160,106 
3231 1016,032,164,192,165,020,236 
3237 1240,214,169,000,162,017,199 
3243 1160,064,076,164,192,032,091 
3249 1000,192,165,020,162,017,221 
3255 1160,032,076,164,192,032,071 
3261 :000,192,165,020,162,022,238 
3267 1160,008,032,164,192,032,015 
3273 1000,192,165,020,162,017,245 
3279 1160,008,076,164,192,032,071 
3285 1000,192,165,020,041,007,126 
3291 1133,020,173,022,208,041,048 
3297 1248,005,020,141,022,208,101 
3303 1032,000,192,165,020,041,169 
3309 1007,133,020,173,017,208,027 
3315 1041,248,005,020,141,017,203 
3321 1208,096,169,032,141,000,127 



3327 : 002 , 162 ,000,142,005, 002,056 
3333 : 134, 002 ,173, 141,002, 208,153 
3339 :251, 160,000, 189,000, 194, 037 
3345 ! 153, 001, 002, 232, 200, 192, 029 
3351 : 004, 208, 24 4, 169, 000, 160, 040 
3357 i002, 032, 030, 171,165,002, 175 
3363 :024, 105, 006, 133, 002, 170, 219 
3369 : 189, 000, 194, 201,255,208,064 
3375 :215,032,115,000,208,251,100 
3381 {096,173,002,221,009,003,045 
3387 {141,002,221,032,000,192,135 
3393 {165,020,041,003,072,073,183 
3399 {003,133,020,173,000,221,109 
3405 {041,252,005,020,141,000,024 
3411 {221,104,024,106,106,106,238 
3417 {133,020,173,136,002,041,082 
3423 {063,005,020,141,136,002,206 
3429 {096,173,136,002,024,105,125 
3435 {003,141,022,192,076,010,039 
3441 {192,032,000,192,165,020,202 
3447 {041,063,010,010,133,020,140 
3453 {173,136,002,041,192,005,162 
3459 :020,141,136,002,165,020,103 
3465 {010,010,133,020,173,024,251 
3471 {208,041,015,005,020,141,061 
3477 {024,208,096,173,024,208,114 
34B3 {041,241,133,002,032,000,092 
3489 {192,165,020,041,007,010,084 
3495 {005,002,141,024,208,096,131 
3501 {173,014,220,041,254,141,248 
3507 {014,220,165,001,041,251,103 
3513 {133,001,032,000,192,165,196 
3519 {020,041,003,162,008,201,114 
3525 {002,208,002,162,016,160,235 
3531 {208,201,001,208,002,160,215 
3537 :216,132,079,160,000,132,160 
3543 {078,134,002,032,000,192,141 
3549 :166,002,160,000,177,078,036 
3555 {145,020,200,208,249,230,255 
3561 :021,230,079,202,208,242,191 
3567 :165,001,009,004,133,001,040 
3573 {173,014,220,009,001,141,035 
3579 {014,220,096,000,000, 154,223 
3585 {000,006,252,000,006,000,009 
3591 {033,240,044,025,208,048,093 
3597 {003,076,049,234,173,006,042 
3603 {197,073,003,141,006,197,124 
3609 {170,172,007,197,185,000,244 
3615 {208,045,008,197,029,002,008 
3621 {197,153,000,208,173,017,017 
3627 {208,041,127,029,001,197, 134 
3633 {141,017,208,189, ODO ,197,033 
3639 {141,018,208,169,001,141,221 
3645 {025,208,076,129,234,120,085 
3651 {169,240,141,026,208,032,115 
3657 {000,192,165,020,141,007,086 
3663 {197,032,000,192,165,020,173 
3669 {141,008,197,032,000,192,143 
3675 {165,020,141,003,197,165,014 
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3873 : 038 , 254 , 165 , 020 , 101 , 253,096 
3879 : 133 , 253 , 144 , 002 , 230 , 254, 031 
3885 * 024 , 006 , 253 , 038 , 254 , 006,114 
3891 * 253 , 038 , 254 , 006 , 253 , 038,125 
3897 * 254 , 165 , 078 , 041 , 007 , 005,095 
3903 * 253 , 133 , 253 , 024 , 165 , 251,118 
3909 * 101 , 253 , 133 , 251 , 165 , 252,200 
3915 * 101 , 254 , 133 , 252 , 173 , 136,100 
3921 * 002 , 041 , 192 , 005 , 252 , 133,194 
3927 * 252 , 173 , 024 , 208 , 041 , 008,025 
3933 * 010 , 010 , 005 , 252 , 133 , 252,243 
3939 * 166 , 002 , 189 , 107 , 198 , 160,153 
3945 * 000 , 096 , 128 , 064 , 032 , 016,185 
3951 * 008 , 004 , 002 , 001 , 192 , 048,110 
3957 * 012 , 003 , 000 , 085 , 170 , 255,130 
3963 * 032 , 246 , 197 , 081 , 251 , 145,051 
3969 * 251 , 096 , 032 , 246 , 197 , 017,200 
3975 * 251 , 145 , 251 , 096 , 032 , 246,132 
3981 * 197 , 073 , 255 , 049 , 251 , 145,087 
3987 * 251 , 096 , 032 , 000 , 192 , 165,115 
3993 * 020 , 041 , 003 , 024 , 105 , 008,098 
3999 * 133 , 002 , 006 , 020 , 038 , 021,123 
4005 * 032 , 255 , 197 , 133 , 002 , 032,048 
4011 * 000 , 192 , 165 , 020 , 041 , 003,080 
4017 * 170 , 189 , 119 , 198 , 037 , 002,124 
4023 * 133 , 020 , 165 , 002 , 073 , 255,063 
4029 * 160 , 000 , 049 , 251 , 005 , 020,162 
4035 * 145 , 251 , 096 , 032 , 000 , 192,143 
4041 * 173 , 136 , 002 , 133 , 252 , 169,042 
4047 * 000 , 133 , 251 , 168 , 162 , 003,156 
4053 * 165 , 020 , 145 , 251 , 200 , 208,178 
4059 * 251 , 230 , 252 , 202 , 208 , 246,072 
4065 * 145 , 251 , 200 , 192 , 232 , 208,173 
4071 * 249 , 096 , 032 , 000 , 192 , 173,205 
4077 * 136 , 002 , 041 , 192 , 133 , 252,225 
4083 * 173 , 024 , 208 , 041 , 008 , 010,195 
4089 * 010 , 005 , 252 , 133 , 252 , 169,046 
4095 * 000 , 133 , 251 , 162 , 032 , 160,225 
4101 * 000 , 165 , 020 , 145 , 251 , 200,018 
4107 * 208 , 251 , 230 , 252 , 202 , 208,082 
4113 * 246 , 096 , 032 , 121 , 000 , 208,208 
4119 * 001 , 096 , 104 , 104 , 076 , 070,218 
4125 * 192 , 169 , 000 , 141 , 176 , 002,197 
4131 * 141 , 178 , 002 , 141 , 179 , 002,166 
4137 * 173 , 167 , 002 , 013 , 168 , 002,054 
4143 * 208 , 002 , 056 , 096 , 162 , 024,083 
4149 * 046 , 176 , 002 , 046 , 177 , 002,246 
4155 * 046 , 178 , 002 , 046 , 179 , 002,000 
4161 * 056 , 173 , 178 , 002 , 237 , 167,110 
4167 * 002 , 168 , 173 , 179 , 002 , 237,064 
4173 * 168 , 002 , 144 , 006 , 140 , 178,203 
4179 * 002 , 141 , 179 , 002 , 202 , 208,049 
4185 * 219 , 046 , 176 , 002 , 046 , 177,243 
4191 * 002 , 024 , 096 , 076 , 144 , 203,128 
4197 * 165 , 020 , 141 , 193 , 002 , 165,019 
4203 * 021 , 141 , 194 , 002 , 032 , 000,241 
4209 * 192 , 165 , 020 , 141 , 197 , 002,062 
4215 * 032 , 000 , 192 , 165 , 020 , 141,157 
4221 * 195 , 002 , 165 , 021 , 141 , 196,, 077 


4227 * 002 , 032 , 000 , 192 , 165 , 020,030 
4233 * 141 , 198 , 002 , 169 , 000 , 141,020 
4239 * 202 , 002 , 056 , 173 , 198 , 002,008 
4245 * 237 , 197 , 002 , 141 , 199 , 002,159 
4251 * 176 , 014 , 169 , 255 , 141 , 202,088 
4257 * 002 , 077 , 199 , 002 , 141 , 199,013 
4263 * 002 , 238 , 199 , 002 , 169 , 000,009 
4269 * 141 , 203 , 002 , 056 , 173 , 195,175 
4275 * 002 , 237 , 193 , 002 , 141 , 200,186 
4281 * 002 , 173 , 196 , 002 , 237 , 194,221 
4287 * 002 , 141 , 201 , 002 , 176 , 027,228 
4293 * 169 , 255 , 141 , 203 , 002 , 077,020 
4299 * 200 , 002 , 141 , 200 , 002 , 169,149 
4305 * 255 , 077 , 201 , 002 , 141 , 201,062 
4311 * 002 , 238 , 200 , 002 , 208 , 003,100 
4317 * 238 , 201 , 002 , 169 , 000 , 141,204 
4323 * 204 , 002 , 173 , 199 , 002 , 205,244 
4329 * 200 , 002 , 169 , 000 , 237 , 201,018 
4335 * 002 , 176 , 076 , 173 , 199 , 002,099 
4341 * 208 , 005 , 141 , 205 , 002 , 240,022 
4347 * 105 , 141 , 177 , 002 , 173 , 200,025 
4353 * 002 , 141 , 167 , 002 , 173 , 201,175 
4359 * 002 , 141 , 168 , 002 , 169 , 255,232 
4365 * 141 , 205 , 002 , 032 , 030 , 199,110 
4371 * 144 , 003 , 076 , 058 , 201 , 173,162 
4377 * 176 , 002 , 013 , 177 , 002 , 208,091 
4383 * 020 , 169 , 255 , 141 , 176 , 002,026 
4389 * 141 , 177 , 002 , 169 , 000 , 141,155 
4395 * 208 , 002 , 169 , 025 , 141 , 209,029 
4401 * 002 , 208 , 049 , 169 , 000 , 141,106 
4407 * 208 , 002 , 141 , 209 , 002 , 240, 089 
4413 * 039 , 169 , 255 , 141 , 204 , 002,103 
4419 * 173 , 200 , 002 , 024 , 109 , 201,008 
4425 * 002 , 240 , 171 , 173 , 199 , 002,092 
4431 * 141 , 167 , 002 , 169 , 000 , 141,187 
4437 * 168 , 002 , 173 , 200 , 002 , 141,003 
4443 * 177 , 002 , 169 , 255 , 141 , 205,016 
4449 * 002 , 076 , 016 , 200 , 238 , 200,061 
4455 * 002 , 238 , 199 , 002 , 173 , 193,142 
4461 * 002 , 041 , 007 , 133 , 002 , 173,211 
4467 * 193 , 002 , 041 , 248 , 133 , 251,215 
4473 * 173 , 194 , 002 , 133 , 252 , 173,024 
4479 * 197 , 002 , 076 , 159 , 203 , 017,013 
4485 * 251 , 145 , 251 , 173 , 204 , 002,135 
4491 * 208 , 095 , 173 , 203 , 002 , 240,036 
4497 * 016 , 056 , 173 , 193 , 002 , 233,050 
4503 * 001 , 141 , 193 , 002 , 176 , 013,165 
4509 * 206 , 194 , 002 , 144 , 008 , 238,181 
4515 * 193 , 002 , 208 , 003 , 238 , 194,233 
4521 * 002 , 056 , 173 , 200 , 002 , 233,067 
4527 * 001 , 141 , 200 , 002 , 176 , 003,186 
4533 * 206 , 201 , 002 , 024 , 173 , 200,219 
4539 * 002 , 109 , 201 , 002 , 240 , 120,093 
4545 * 173 , 205 , 002 , 240 , 165 , 024,234 
4551 * 173 , 176 , 002 , 109 , 208 , 002,101 
4557 * 141 , 208 , 002 , 173 , 177 , 002,140 
4563 * 109 , 209 , 002 , 141 , 209 , 002,115 
4569 * 144 , 144 , 173 , 202 , 002 , 240,098 
4575 * 006 , 206 , 197 , 002 , 076 , 107,049 
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4561 

4587 

4593 

4599 

4 60 5 

4611 

4617 

4623 

4629 

4635 

4641 

4647 

4653 

4659 

4665 

4671 

4677 

4683 

4689 

4695 

4701 

4707 

4713 

4719 

4725 

4731 

4737 

4743 

4749 

4755 

4761 

4767 

4773 

4779 

4785 

4791 

4797 

4803 

4609 

4815 

4621 

4827 

4633 

4839 

4845 

4851 

4857 

4863 

4869 

4875 

4881 

4687 

4893 

4899 

4905 

4911 

4917 

4923 

4929 


200,238,197,002,076,107,025 

200,173,202,002,240,006,034 

206,197,002,076,250,200,148 

238,197,002,206,199,002,067 

240.058.173.205.002.240.147 
040,024,173,176,002,109,015 
208,002,141,208,002,173,231 
177,002,109,209,002,141,143 
209,002,144,019,173,203,003 

002.240.017.056.173.193.196 
002,233,001,141,193,002,093 
176,003,206,194,002,076,184 
107,200,238,193,002,208,225 

248.238.194.002.208.243.160 

096.196.122.096.032.000. 089 

192.165.020.141.075.201.089 
165,021,141,076,201,096,001 

143.183.000. 169.000.141.199 
193,002,141,196,002,032,135 
000,192,165,020,141,197,034 

002.032.000. 192.169.056.032 
197,020,169,001,229,021,224 
176,005,169,255,141,193,020 
002,165,020,041,007,133,223 
002,165,020,041,248,133,214 
251,165,021,133,252,032,209 
000,192,169, 192,197,-020, 131 
176,005,169,255,141,196,053 
002,165,020,041,007,141,005 
194,002,141,195,002,165,078 
020,032,014,198,165,251,065 
041,248,133,251,173,197,178 

002.133.020. 169.000. 133.110 
021,006,020,038,021,006,027 

020.038.021.006.020.038.064 
021,024,173,075,201,101,010 
020,133,020,165,021,109,145 
076,201,133,021,024,165,047 
251,105,008,141,177,002,117 

165.252.105.000. 141.178.024 
002,165,021,041,208,201,083 

208.208.007.120.165.001.160 

041.251.133.001.169.000. 052 
141,176,002,166,002,240,190 
005,056,106,202,208,251,041 

141.179.002.172.176.002.147 

177.020.166.002.240.004.090 
074,202,208,252,032,077,076 
202,208,238,044,193,002,124 

048.056.056.169.008.229.065 

002.133.002.201.008.240.091 
045,173,177,002,133,251,036 
173,178,002,133,252,169,168 
000,141,176,002,173,194,209 
002,141,195,002,173,179,221 
002,073,255,141,179,002,187 
172,176,002,177,020,166,254 
002,010,202,208,252,032,253 

077.202.208.240.169.004.197 


4935 : 00 5, 001, 133, 001, 088, 0 96, 139 
4941 ! 172 , 195,002,044,077, 201,000 
4947 : 04 8, 012, 133, 254,173,179, 114 
4953 : 002, 04 9, 251, 005, 254, 076, 214 
4959 *.099,202,081, 251, 14 5, 251, 100 
4965 : 200, 140, 195, 002 , 192, OOB , 070 
4971 : 208, 017, 160, 064, 140, 195, 123 
4977 i 002, 230, 252, 044, 196, 002,071 
4983 i 016, 00 5, 169, 00 7, 141,176,121 
4'989 :002, 238, 176, 002, 173, 176, 124 
4995 {002,201,008,096,169,000,095 
5001 i 141, 077, 201, 076, 078, 201,143 
5007 : 169, 255, 141, 077, 201,076, 038 
5013 :079, 201,032, 115,000, 032,095 
5019 : 04 0, 175, 234, 234, 234, 234, 026 
5025 :234,234,165,071,133,020,250 
5031 :165,072,133,021,160,000,206 
5037 {177,020,240,213,056, 165,020 
5043 {020,233,002,133,020,176,251 
5049 :002,198,021,177,020,197,032 
5055 :069,208,196,200,177,020,037 
5061 :197,070,208,189,160,003,000 
5067 *.177,020,133,251,200,177,137 
5073 {020,133,252,169,000,133,148 
5079 :253,133,002,133,254,160,126 
5085 {000,177,071,170,164,002,037 
5091 {177,251,201,018,208,007,065 
5097 *.169,128,133,253,076,009,233 
5103 {203,201,146,208,007,169,149 
5109 {000,133,253,076,009,203,151 
5115 {041,191,016,002,073,192,254 
5121 -.005,253,164,254,14 5,251,04 9 
5127 {230,254,230,002,202,208,109 
5133 *.211,165,254,160,000,14 5,180 
5139 {071,096,000,000,000,000,186 
5145 {000,000,000,000,000,000,025 
5151 {000,000,072,020,010,000,133 
5157 {153,034,147,154,083,085,181 
5163 {080,069,082,066,065,083,232 
5169 {073,067,032,066,089,032,152 
5175 {077,067,083,079,070,084,003 
5181 :032,040,067,041,032,049,066 
5187 {057,056,051,034,000,101,110 
5193 :020,015,000,129,074,178,233 
5199 {049,164,053,048,058,161,100 
5205 {065,036,058,139,065,036,228 
5211 {178,034,034,167,130,058,180 
5217 {137,050,048,000,107,020,203 
5223 {016,000,130,000,143,020,156 
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5229 : 020, 000, 153,034,091,067, 218 
5235 : 065, 084, 065, 034, 0 58, 144,053 
5241 : 067, 065,084, 065, 058 ,144,092 
5247 : 070, 067, 079, 076 , 04 9, 052 ,008 
5253 :058, 144,066,075,071, 068, 103 
5259 : 0 54, 058, 162, 000, 000, 032, 189 
5265 : 000, 192,165,020, 141,158,0 53 


Gli otto brevi programmi danno un esemplo delle possibili- 
tà del SUPER BASIC; provate a caricarli (con SUPERBASIC 
attivato) e siamo certi ne sarete entusiasti! 

Programma 1 

5 [FCOL7: [EXTC10:A=32 
8 [MXGR33, 240, 109, 5, 189, 0 
10 [FSCRA: [FCOLA+25 

12 (CMXVA+100 , A 

13 [EXTCA+50 

15 GETA$:IFA$=""THENl5 

16 1FA$“" {CLR} "THEN [KMXG: [FCOL4: 
[EXTC7 : [BKGDl3:A=32 : [ FSCRA :EN 
D 

20 A*ASC(A$) ;GOTO10 


Programma 2 

10 [BMGRl: [CB2K4 : [FBMSO: [MCGRl: [ 
FSCR32 

20 [BKGD3: [FCOL4 

60 FOROOTO3 : FORX= 50TO54 : FORY» 50 
T054 

70 [MCPLX+C*10, Y+C*10,C: NEXT: NEX 
T: NEXT 

75 [BKGD5 

80 GETA$:IFAS-""THEN80 

90 [CB2K2: [BMGR0: [MCGR0 : PRINT" 
{CLR} " 

100 IFA$O"Q"THEN10 

110 END 

Programma 3 

10 [BMGRl: [CB2K4: [FBMSO: IFSCR8 3 

20 [BKGD3: [FCOL4 

30 [HRCS 53248 

60 FORX=0TO319STEPl6 

61 [DRAWl, 0,0, X, 199: [DRAW1, 319,0 
,X,199 

62 [DRAWl, 0, 199, X,0: [DRAWl, 319,1 
99 ,X,0 

63 NEXT 

69 FORY-0TO199STEP16 

70 [DRAWl, 319, 0,0, Y: [DRAWl, 0,0, 3 
19, Y 

71 [DRAWl, 0, 199, 319, Y: [DRAWl, 319 
, 199 , 0, Y 


5271 : 203,032,000, 192,076, 101,243 
5277 {199,000,032,014,198, 174,006 
52B3 : 158,203,240,003,076, 132,207 
5289 : 200, 073, 255, 049, 251,076,04 9 
5295 :134, 200,032,057, 195,032,057 
5301 :066,195,032,218,197,096,217 


72 NEXT 

74 [DRAWl, 0, 0,319, 199: [DRAWl, 0,1 
99,319,0 

75 [BKGD5:Z-10 

80 GETA$ : IFA$«""THEN80 

81 [CODEA$:W=ASC{A$) : (CHARW,Z,13 
5: [CHRXW , Z , 150 

85 GETS$:IFS$ = ,M1 THEN85 
90 IFS$»"Q"THEN1Q 

92 IFS$bCHR$ (13) THEN100 

93 Z-Z+9:A$«S$:G0T081 

100 [CB2K2: [BMGR0: PRINT" {CLR} " 
110 END 

Programma 4 

5 C-l 

10 [BMGRl: [CB2K4: [FBMSO: [FSCR99 
20 [BKGD3: [FCOL4: [EXTC8 
30 X-0:X1-319:Y*0:Y1=199 
40 FORK=lTOC+37 

61 [DRAWC ,X,Y,Xl,Y+5:X=X+5: [DRAW 
C,Xl,Y,Xl-5 , Yl: Y=Y+5 

62 [DRAWC, Xl, Yl, X, Yl-5: Xl-Xl-5: [ 
DRAWC , X , Yl ,X+5 , Y: Yl*Yl- 5 

70 NEXT 
75 [BKGD5 

80 GETA$ : IFA$“"”THEN80 

90 IFC“lTHENC=0 :GOTO30 

100 [CB2K2: [BMGR0 SPRINT" {CLR}" 

105 [SCRN1, 0 , 2 

110 END 

Programma 5 

10 [BMGRl: [CB2K4: [FBMSO: [MCGRl: [ 
FSCP87 

20 [BKGD15: [FCOL10: [EXTC1 
60 FORC*0TO3 : FORX* 50TO54 : FORY*50 
T054 

70 [MCPLX+C*10, Y+C*10,C: NEXT:NEX 
T: NEXT 

71 FORX-OT0319STEP64:FORY*OTOl99 
STEP50 

72 FORZ-319TOOSTEP-64:FORQ-199TO 
0STEP-50 
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75 [ DRAW 1 , X , Y , Z , Q 
77 NEXT : NEXT : NEXT : NEXT 
80 GETA$:IFA$»""THEN80 
90 [CB2K2 : [ BMGRO : [MCGRO : PRINT" 
{CLR} " 

110 END 


Programma 6 

5 [FC0L7: [EXTC10:A«32 
8 [MXGR22, 239, 109, 255, 189,0 
10 [FSCRA: [FCOLA+25 

12 [CMXVA+100 f A 

13 [EXTCA+50 

15 GETA$:IFA$« n "THENl5 

16 IFA$=" {CLR} "THEN [KMXG: [FCOL4: 
[EXTC7: [BKGD13 : A*32 : [ FSCRA :EN 
D 

20 A=ASC{A$) i GOTO 10 


Programma 7 

5 C-l 

10 [BMGRl: [CB2K4: (FBMSQ: [FSCR99 
20 [BKGD3: {FCOL4: [EXTC8 
30 X*0:Xl*319: Y*0 : Yl=199 
40 FORK-1TOC+37 

61 [DRAWC,X1,Y,X,Y+4:X*X+1: [DRAW 
C,Yl»X,Y+5,Yl:Y-Y+3 

62 [DRAWC,Xl,Yl,X f Yl-5:Xl=Xl-5: [ 
DRAWC ,X , Yl/X+5,Y: Yl^Yl-5 

70 NEXT 
75 [BKGD5 

80 GETA$ :IFA$* n,, THEN80 
90 IFC*1THENC=0 : GOTO30 




100 [CB2K2: [BMGRO: PRINT" {CLR}" 
105 [SCRNl ,3,2 
110 END 

Programma 8 

5 X=170 : Y*1Q0 :R*99 

10 [BMGRl: [CB2K4: [FBMSO : [FSCR99 

20 FORRA=OTO/2STEP/180 . 

30 C=COS (RA) *R: S 3 SIN (RA) *R 
40 [FLIPX+C, Y+S : [FLIPX+C, Y-S : [FL 
IPX-C,Y+S: [FLIPX-C,Y-S:NEXT 
50 [ PLOTX , Y 

55 IFQ=0THENQ=1:X=137 : Y*109 :R=78 
: GOTO 20 

60 GETA$ : IFA$*""TH£N60 
70 (BMGRO: [CB2K2: PRINT" {CLR}" 
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di A. Hiyei 

(rad. a adatt. di F, Stella 


Questo è un gioco d'azione per due 
persone per II ViC 20 ed II CS4; pre- 
vede l'uso delle pad di e, e la versio- 
ne per 11 C64 è stata trascritta 
completamente In linguaggio mac- 
china. 


a no dei problemi incontrati nella 
programmazione del giochi con il 
ViC 20, è la mancanza della seconda 
porta di controllo per Joystick (che il 
C64 invece, ha). Per questo motivo la 
maggior parte dei giochi sono stati 
scritti per un solo giocatore. Ma non 
c'è dubbio che il divertimento di un 
gioco a due sìa maggiore, in quanto 
avere come avversario li computer ci 
pone In condizione di svantaggio ogni 
qualvolta siano in gioco i tempi di ri* 
flesso e te deduzioni logico- 
matematiche; cosi se non si provvede 
a limitarne le capaciti, "fui” vince 
sempre. In un gioco a due. Invece, si 
affronta un altro essere umano che ha 
la stessa nostra debolezza e disconti- 
nuità di rendimento. Hon solo c'è dun- 
que una più alta probabilità di vincere, 
ma il gioco a due permette di usare M 
computer Insieme, nello stesso mo- 
mento, Vi sono tre modi per program- 
mare giochi a due con azione simulta- 
nea per II VIC 20: una seconda porta 
per joystick può essere creata con una 
apposita Interfaccia alia USER PORI 
(non facile per principianti); si può usa- 
re la tastiera per controllare il gioco 
(ma risulta macchinoso. In due) oppu- 
re LI gioco può essere scritto per l'uso 
delle paddie; questi accessori si trova- 
no in commercio a coppie, collegati al- 
io stesso connettore per Joystick (nel 
C64 andranno collegati allo porta 1 )♦ 

Animazione In alta risoluzione 

Il gioco DUELLO SPAZIALE dà, ad 
ogni giocatore, N comando di un cac- 
cia stellare, situato ai margini dello 
schermo, mobile (attraverso opportu- 
ne rotazioni della manopola) in senso 
verticale. 

Provando ad osservare da vicino la na- 
ve spaziale e ruotando lentamente la 


manopola, si può notare che, a diffe 
renza di molli giochi per il VIC 20 ed 11 
C64, gli oggetti non si muovono In 
grossolani incrementi dello spazio di 
un carattere ma scorrono dolcemente 
su e giù di un pixel per volta. 

Questo tipo di risoluzione sarebbe in- 
credibilmente lenta se programmata In 
BASIC la versione VIC usa una subrou- 
line in LM per ottenere questo fine mo- 
vimento. la versione C64 usa gli aprite 
ed è interamente scritta in LM. 
Ruotando la manopola più velocemen- 
te, si scopre un altro tipo di movimen- 
to: balzi veloci in un senso o nell altro, 
questo perché lo stato delle paddle è 
rappresentato nella memoria sotto for- 
ma di un valore assoluto e non direzio- 
nale, come nel caso dei joystick. Con 
un rapido movimento del polso è pos- 
sibile variare discretamente il valore, 
prima della successiva lettura, saltan- 
do cosi da una posizione aliai tra senza 
passare per le intermedie. Entrambi I 
movimenti si rivelano molto utili nel 
gioco: balzi per evitare il fuoco nemico 
e piccoli ed accurati spostamenti per 
mirare con precisione. 


Ducilo tra navi spaziali 

Lo scopo di questo gioco è semplice: 
colpire la nave avversarla più di quanto 
non si sia colpiti da questa. Per aziona- 
re il FUOCO: un raggio sibila Immedia- 
tamente attraverso lo schermo (a veloci- 
tà di LM) verso il bersaglio; se il colpo 
va a segno, si aziona un suono dì 
esplosione e lampi colorati appaiono 
sullo schermo. Durante il gioco biso- 
gna, ovviamente, evitare I colpi nemici 
oltre che sparare; lincrodarsl di colpi 
può divenire cosi rapido che solo I gio- 
catori più scaltri riescono a stare al 
passo. Ogni colpo mandato a segno 
sulla nave nemica vale dieci punti; 
mentre, per prevenire l'uso di raffiche 
sconsiderate, ogni emissione laser de- 
trae un punto, cosi ogni centro fa gua- 
dagnare In realtà nove punti. I punteg- 
gi aggiornati sono evidenziati nella 
parte alta dello schermo ed il gioco fi- 
nisce quando uno dei giocatori rag- 
giunge 60 punti per it VIC 20 e 500 
punti per il C64; per riprendere il gioco 
ed azzerare il punteggio basterà pre- 
mere il tasto delle paddle oppure ri- 
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spendere da tastiera alla richiesta del 
computer. 

Suggerimento: nella versione V1C, pub 
talvolta succedere che le paddle funzio 
nino In modo irregolare. In tal caso 
premere RGN/STOP e RESTOSE e ri- 
partire. questo pulisce La memoria eli- 


minando alcuni valori che possono In- 
terferire con il controllo delle paddie; 
ricordare Inoltre di non lasciare pre- 
muto II tasto del registatore perché 
questo impedisce l'uso regolare della 
pad die sinistra* Per caricare la versio- 
ne C64 (tutta in LM). bisogna usare il 


programma MLX. che facilita enorme- 
mente il lavoro rendendolo pratica- 
mente esente da errori. Le info melo- 
ni necessarie per l'uso di MLX sono: In- 
dirizzo di partenza: 49152, Indirizzo fi- 
nale: 50393, per avviare il gioco digita- 
re SYS49152, 


Duello spaziale versione per VIC 20 


0 FRI NT" {CLR} * «PORI-6656T06891 «READA: POKE 

I , A: NEXT tre"» 188 

1 GOSUB200: PRINT* {CLR}" »een» 225 

3 POKE4 , 0 : P0KE2 , 0 : POKE 3 , 0 «rem 225 

4 FORI-7167T07600 «POKBI ,0 «NEXTI : POKE36869 

,255 «*«» 

7 PORI •lTO8:POKE7662,0s NEXT sre® 195 

8 A$-*{ 2 OES) (POR) 222222222222222222 

{ 2 DBS}" ««» 178 

9 C$-*{ 2 DBS) {PBR}333333333333333333 

{ 2 DBS}" «re® 199 

10 BS-"{HOHZ}{ 22 GIU 1 }" «re® 209 

11 D$-"{ 2 DESHBLKH 18 SPAZI) { 2 DBS)": 

POKE 36879 , 8 : F=80 «re® 82 

30 FORI-7747TO8099STBP22 : PORRI , J s J-J+1:NB 
XT «rem 206 

35 FORI -774 7+30720T030720+8099STEP22 «POKE 
1,3 «NEXT «rem 163 

40 J> 33 «F0RI-7766T08118STEP22 «PORSI, JtJ-J 
-fi «NEXT «re® 239 

45 FORI -7766+3Q720TO8118+30720STEP22: POKE 




1,7 «NEXT 

: rem 

161 

46 PRI NT" { HOME }( RVS ){WHT) PUNTI: 

Vrem 

47 

50 

SYS66S6 

ì rem 

59 

52 

PRINT" {HOME} { 6 DES) { RVS ) (CYN) "PEEK (2) 

" {SIN} " ;TA8 ( 17) ; " { YEL) "PEEK (3) * {SIN} " 



; rem 

165 

54 

FORT- 1TO30 «NEXT 

: rem 

145 

55 

SYS6811 

: rem 

57 

56 

ONPEEK (4) GOSUBSO 

srem 

154 

57 

SYS6864 «ONPEEK (5) GOSUB100 

s rem 

214 

58 

SYS6772 

: rem 

66 

60 

GOTO50 

s rem 

4 

80 

A-PEEK (0)+33+3 

s rem 

123 

82 

B-INT (A/8) -1«D- (A-B*8) +2 

:rem 

166 

84 

POKE7566+D, 255 

: rem 

170 

90 

I FD< 7THENFRINTLEFTS { BS , B ) JA$«SYS6832«P 


RINTLEFTS (B$ ,B) JD$ «POKE 7 566+D,0 

«rem 117 

91 H-PEEK(2)-1«IFH>-1THENPOKE2,H«GOT093 

ire® 133 

92 H-0 «rem 32 

93 I FD > 7 THENP RI NTLEFTS (BS ,B+1) ;C$ «SYS6832 
«FRI NTLEFTS ( BS , B+ 1 ) JDS «FOKE7566+D, 0 

ire® 52 

94 IPPEEK (7432+PEEK {0) -f 3) OOTHENGOSUB120 




I rem 

93 

95 RETURN 

i rem 

78 

100 

A-PEEK (1) +33+3 

: rem 

165 

102 

B-INT (A/8 ) - 1« D- (A-B*8) +2 

i rem 

207 

103 

P0KE7566+D, 255 

: rem 

210 

104 

H-PEEK ( 3 ) - 1 : IFH>- 1THENPOKE3 

,H:GOTO106 


; rem 

221 

105 

H-0 

t rem 

75 


106 IFD< 7THENPRI NTLEFTS (B$,B> ;AS:SYS6832: 
PRI NTLEFTS ( BS , B ) { D$ : POKZ7 5 6 6 +D , 0 

«rem 163 

107 IFD >7THENPRI NTLEFTS (B$,B+1) ;C$:SYS683 
2:PRINTLEFT$ (BS ,B-f 1) f D$ : POKE7566+D, 0 


: re® 96 


109 IFPEEK (7168+PEEK (1) +3) O0THBNG0SUB140 




srem 

147 

110 

RETURN 

: rem 

114 

120 

POKE36878, 15 

: rem 

100 

121 

FORI » 2 5 5TO 1 3 0STEP - 2-: POKE3 6 B 7 7 , 1 « POKE 3 


6879 , INT (RND (1) *7) +8: NEXT 

srem 

225 

122 

POKE 2 , PEEK ( 2) +10 ■ 

:rem 

86 

123 

IFPEEK (2) ->FTHEN150 

:rem 

33 

124 

POKE36879, 8: POKE36B77,0 «RETURN 




s rem 

41 

140 

POKE36878 » 15 

: rem 

102 

141 

FORI “255T013OSTEP-2 : POKE36877# 1 : POKE 3 


6879, INT { RND (1) *7) +8 «NEXT 

srem 

227 

142 

POKE3, PEEK (3) +10 

: rem 

90 

143 

IFPEEK ( 3) ->FTHBN1S0 

: rem 

86 

144 

POKE36879 , 8: POKB36877 , 0: RETURN 




srem 

43 

150 

PRINT* {HOME} {RVS} (WHTj PUNTI 3 

m 




t rem 

91 


152 PRINT"{HOME}{ 6 DES){RVS){CYN}"PEEK(2 
> ;TAB(18> ; " ( YEL) "PEEK { 3) «POKE36B77.0 

«rem 233 


154 POKB36879, 8 «rem 62 

156 PRINT"{HOME}{ 2 GIU 1 } (RVS) (GRU) GAME O 

VERI" «re® 73 

157 POKE198 ,0:WAIT19B , 1:RUN tre® 103 

200 POKE36679, 8 : POKE36B69 , 240 : PRINT- (CLR) 

- t rem 15 

210 PRI NT" { RVS 1 (YEL) { 22 SPAZI) {OFF} 

{ 4 SPAZI) (CYN) DUELLO SPAZI ALE (YEL) 

{ 3 SPAZI) (OFF)"; «rem 206 

220 PRI NT" { RVS ) {YEL) { 22 SPAZI) "«rem 21 
240 PRINT" { 4 GIU’} {BLU} { 4 SPAZI) PREMI U 
N tasto «rem 83 

250 POKE198,O:HAIT190, 1 «RETURN «rem 76 
260 DATA173, 8, 144, 74, 133, 0,234, 170, 169, 24 
0, 157, 0,2B, 232, 169, 252, 157, 0,28, 232 




; rem 208 

262 DATA169, 14,157 irei 174 

265 DATAO ,28,232,169,59,157,0,28,232, 169, 

59.157.0. 28.232.169.14.157.0.28.232.1 

69.252 ; cero 116 

270 DATA157, 0,28, 232, 169, 240, 157, 0,28, 173 

,9,144,74,133,1,170,169,15,234,157,8, 
29 : rem 161 

275 DATA232, 169 :rem 27 

280 DATA63, 157, 8, 29, 232, 169, 112, 157, 8, 29, 
232,169,220,157,8,29,232,169,220,157, 
8,29,232 - treni 221 

290 DATA169, 112, 157, 8, 29, 232, 169, 63, 157,8 
,29,232,169,15,157,8,29,96,251,4,24,6 

6. 252 t rem 84 

300 DATA166, 0,169,0, 160, 0,157, 0,28, 232, 20 

0,192,9,208,247,166,1,169,0,160,0 

i rem 82 

305 DATA 157 ,8,29,232 treni 13 

310 DATA200, 192,9,208,247,96,3,255,179,25 
2,81,119,1,111,174,17,145,224,110,240 
,5,169,0 trem 183 

320 DATA133, 4, 96, 169,1,133,4,96,253,162,2 
24,56,169,14,141,14,144,162,255,142 

trem 211 

325 DATA11, 144 , 202 trem 155 

330 DATA160, 0,200, 192,74,208,251,224,128, 

208.241.169.0. 141.11.144.96.119.111.1 

59 trem 135 

335 DATA163, 169 trem 27 

340 DATA127, 141, 34, 145,174, 32, 145, 169, 255 
,141,34,145,224,119,240,5,169,0,133 

trem 205 

345 DATA5, 96, 169,1 trem 175 

350 DATAI 33, 5, 96, 219 trem 13 


Duello spaziale versione per C64 


49152 : 169,055,141,000, 208,169,230 
49158 :002, 141,016, 208,169,032,062 
49164 : 141, 002, 208, 032, 070, 196, 149 
49170 :169, 147,032,210,255, 169, 232 
49176 : 012, 141,033,208,169,192,011 
49182 : 141, 248, 007, 169,193,141,161 
49188 : 249, 007, 169, 193,141,249,020 
49194 : 007, 169, 003, 141, 021, 208, 079 
49200 : 169, 000, 141, 134,002,169, 151 
49206 :000, 141,039,208,169,002, 101 
49212 : 141, 040, 208, 169, 000, 160, 010 
49218 :000, 145,000,200,192,024, 115 
49224 :208, 249, 169,015,141,024,110 
49230 : 212, 169,017,141,00 5,212,066 
49236 : 169, 246, 141, 006, 212, 169, 003 
49242 :050, 141,000,212,141,001, 123 
4924 8 : 212, 169, 000, 160, 000, 153, 022 
49254 : 060, 003, 200, 192, 060, 208, 057 
49260 :248, 169,000, 170,168,024,119 
49266 : 109, 025, 212, 144, 004, 200, 040 
49272 :140,060,003,202,208,243,208 
49278 {169,000,170,168,024,109,254 
49204 {026,212,144,004,200,140,090 
49290 :062,003,202,208,243,169,001 


49296 :000,205,060,003,240,007,147 
49302 {144,005,169,000,141,060,157 
49308 {003,169,180,205,060,003,008 
49314 :176,005,169,180,141,060,125 
49320 {003,169,000,205,062,003,098 
49326 {144,005,169,000,141,062,183 
49332 :003,169,180,205,062,003,034 
49338 {176,005,169,180,141,062,151 
49344 {003,024,173,060,003,105,048 
49350 {050,141,001,208,024,173,027 
49356 {062,003,105,050,141,003,056 
49362 {208,056,173,060,003,074,016 
49368 {074,074,024,105,001,141,123 
49374 {090,003,056,173,062,003,097 
49300 {074,074,074,024,105,001,068 
49386 {141,092,003,169,000,141,012 
49392 {091,003,173,090,003,010,098 
49398 {046,091,003,010,046,091,021 
49404 : 003, 010, 141,072,003,173,142 
49410 :091,003,141,073,003,173,230 
49416 : 072, 003, 010, 046, 091, 003, 233 
49422 :010,046,091,003,024,109,041 
49428 :072,003,141,090,003,173,246 
49434 {091,003,109,073,003,141,190 
49440 :091,003,024,173,090,003,160 
49446 :105,005,141,090,003,173,043 
49452 {091,003,105,004,141,091/223 
49458 {003,169,000,141,093,003,203 
49464 :173,092,003,010,046,093,217 
49470 {003,010,046,093,003,010,227 
49476 {141,074,003,173,093,003,043 
49482 {141,075,003,173,074,003,031 
49488 {010,046,093,003,010,046,032 
49494 :093,003,024,109,074,003,136 
49500 {141,092,003,173,093,003,085 
49506 {109,075,003,141,093,003,010 
49512 {024,173,092,003,105,005,250 
49518 {141,092,003,173,093,003,103 
49524 {105,004,141,093,003,173,123 
49530 {090,003,133,251,173,091,095 
49536 {003,133,252,173,092,003,016 
49542 {133,253,173,093,003,133,154 
49548 {254,173,001,220,041,004,065 
49554 {240,003,076,077,194,160,128 
49560 :000,169,067,145,251,024,040 
49566 :165,252,105,212,133,252,253 
49572 {169,002,145,251,056,165,184 
49578 {252,233,212,133,252,200,172 
49584 {192,030,208,229,056,165,032 
49590 {251,233,080,141,064,003,186 
49596 {165,252,233,000,141,065,020 
49602 {003,024,165,251,105,040,014 
49608 {141,066,003,165,252,105,164 
49614 :000,141,067,003,056,173,134 
49620 : 064, 003, 229, 2S3, 141, 068, 202 
49626 :003,173,065,003,229,254,177 
49632 {013,068,003,176,061,056,089 
49638 : 173,066,003,229,253,141,071 
49644 {068,003,173,067,003,229,011 
49650 {254,013,068,003,144,042,254 
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49656 

49662 

49668 

49674 

49680 

49686 

49692 

49698 

49704 

49710 

49716 

49722 

49728 

49734 

49740 

49746 

49752 

49758 

49764 

49770 

49776 

49782 

49788 

49794 

49800 

49806 

49812 

49818 

49824 

49830 

49836 

49842 

49848 

49854 

49860 

49866 

49872 

49878 

49884 

49890 

49896 

49902 


032,121,195,024,173,078,103 

003,105,011,141,078,003,083 

173.079.003.105.000. 141.249 
079,003,056,173,078,003,146 

233.244.141.068.003.173.110 
079,003,233,001,013,068,163 

003.144.003.076.015.195.208 

162.255.160.015.136.208.202 
253,202,208,248,173,078,178 
003,013,079,003,240,014,142 
173,078,003,208,003,206,211 

079.003.206.078.003.032.203 
149,195,160,030,169,032,031 

145.251.136.192.000. 016.042 
247,173,001,220,041,008,254 
240,003,076,012,195,160,000 
000,169,067,145,253,024,234 
165,254,105,212,133,254,193 
169,006,145,253,056,165,126 
254,233,212,133,254,200,112 
192,030,208,229,056,165,224 
253,233,080,141,064,003,124 

165.254.233.000. 141.065.214 

003.024.165.253.105.040.208 
141,066,003,165,254,105,102 
000,141,067,003,056,173,070 
064,003,229,251,141,068,136 

003.173.065.003.229.252.111 
013,068,003,176,060,056,024 
173,066,003,229,251,141,005 

068.003.173.067.003.229.203 
252,013,068,003,144,041,187 
032,121,195,173,076,003,016 
105,010,141,076,003,173,186 

077.003.105.000. 141.077.087 
003,056,173,076,003,233,234 
244,141,084,003,173,077,162 
003,233,001,013,084,003,039 
144,003,076,068,195,162,100 
255,160,015,136,208,253,229 
202,208,248,173,076,003,118 
013,077,003,240,014,173,246 




4 9908 : 076, 003, 208, 003, 206, 077, 04 9 
4 9914 : 003, 206, 076, 003,032, 149,207 
49920 :195, 160,030, 169,032, 145,219 
49926 : 253, 136, 192, 000, 016, 247, 082 
49932 : 076, 109, 192, 169, 147, 032, 22 5 
49938 : 210, 255, 169, 000, 141, 021, 046 
49944 : 208,160, 012, 162,010,032,096 
4 9950 : 240, 255, 160, 000, 18 5, 236, 082 
49956 ! 195,200, 032, 210,255, 192,096 
49962 : 044, 208, 245, 165, 197, 201,078 
49968 :064,240,250,165,197,201,141 
49974 : 025, 240, 008, 165, 197, 201,122 
49980 : 0 39, 208, 238, 096, 096, 076, 045 
49986 ; 000, 192, 169, 147,032,210,048 
49992 :255, 169,000, 141,021,208,098 
49998 : 160, 012,162,010,032,240, 182 
50004 : 255, 160, 000, 185, 025, 196, 137 
50010 : 200, 032, 210, 255, 192, 044, 255 
50016 :208, 245, 165, 197,201,064, 152 

50022 :240, 250, 165,197,201,025,156 
50028 :240, 008, 165,197,201,039,190 
50034 : 208, 238,096,096,076,000,060 
50040 :192, 162,255,238,032, 208, 183 
50046 : 202, 208, 250, 169, 129, 141, 201 
50052 :004, 212, 162,255, 160,115,016 
50058 : 136, 208, 253, 202, 208, 248, 113 
50064 : 169, 128, 141,004,212,160, 190 
50070 : Oli, 162, 000, 024, 032, 240, 107 
50076 : 255, 169, 032, 032, 210, 255,08 5 
50082 : 160, 012, 162,000,024,032,040 
50088 : 240, 255, 169, 032, 032, 210, 082 

50094 : 255, 160, 026, 162, 000, 024, 033 
50100 : 032, 240, 255, 169,032,032, 172 
50106 :210, 255,160,027, 162^000, 232 
50112 : 024, 032, 240, 255, 169,032,176 

50118 : 032, 210, 255, 160, 010, 162,003 
50124 : 000, 024, 032, 240, 255, 174, 161 
50130 : 078, 003, 173, 079, 003, 032, 066 
50136 : 205,189,160,025,162,000,189 
50142 : 024, 032, 240, 255, 174, 076, 255 
50148 : 003, 173, 077, 003, 032, 205, 209 
50154 :189, 096,080,076,065, 089,061 
50160 :069,OB2,032,049,032,087,079 
50166 : 073, 078, 083, 013, 013, 032, 026 
50172 : 032, 032, 032, 032, 032, 032, 188 
50178 :032, 032, 072, 073, 084, 032, 071 
50184 : 089, 032, 084, 079, 032, 080, 14 8 
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50190 : 076 , 065 , 089 , 032 , 065 , 071, 156 
50196 : 065 , 073 , 078 , 032 , 032 , 080, 124 
50202 .* 076 , 065 , 089 , 069 , 082 , 032,183 
50208 : 050 , 032 , 087 , 073 , 078 , 083,179 
50214 : 013 , 013 , 032 , 032 , 032 , 032, 192 
50220 : 032 , 032 , 032 , 032 , 032 , 072, 020 
50226 : 073 , 084 , 032 , 089 , 032 , 084, 188 
50232 : 079 , 032 , 080 , 076 , 065 , 089, 221 
50238 : 032 , 065 , 071 , 065 , 073 , 070, 190 
50244 : 032 , 032 , 160 , 000 , 185 , 084,049 
50250 : 196 , 153 , 000 , 048 , 200 , 192,095 
50256 : 147 , 208 , 245 , 096 , 001 , 255 , 00 8 
50262 : 000 , 000 , 003 , 192 , 000 , 003,028 
50268 : 240 , 000 , 063 , 248 , 000 , 063,194 
50274 : 2 52 , 000 , 063 , 254 , 015 , 255,169 
50280 : 254 , 000 , 063 , 255 , 063 , 255, 226 
50286 : 255 , 000 , 063 , 255 , 255 , 255, 169 
50292 : 255 , 000 , 063 , 255 , 063 , 255, 239 
50298 : 255 , 000 , 063 , 255 , 015 , 255, 197 
50304 : 254 , 000 , 063 , 254 , 000 , 063,2 50 
50310 : 252 , 000 , 063 , 248 , 000 , 003,188 
50316 : 240 , 000 , 003 , 192 , 000 , 255,062 



50322 1000 , 255 , 000 , 127 , 252 , 000,012 
50328 : 015 , 248 , 001 , 255 , 240 , 000>143 
50334 : 063 , 224 , 007 , 255 , 192 , 000, 131 
50340 : 255 , 128 , 031 , 245 , 192 , 003,250 
503 46 : 228 , 224 , 007 , 213 , 127 , 015,216 
50352 : 142 , 048 , 255 , 255 , 240 , 015, 107 
50358 : 142 , 048 , 007 , 213 , 127 , 003, 210 
50364 : 228 , 224 , 031 , 245 , 192 , 000,084 
50370 : 255 , 128 , 007 , 255 , 192 , 000, 007 
50376 : 063 , 224 , 001 , 255 , 240 , 000, 215 
50382 : 015 , 248 , 000 , 127 , 252 , 255, 079 
50388 : 255 , 013 , 013 , 013 , 013 , 137, 14 4 





IN MILANO - VIA MASCHERONI, 14 


IL VOSTRO 

“NUOVISSIMO” 
COMPUTER SHOP 

Libri e riviste di elettronica e informatica. 

CORSI CONTINUI 
TUTTO L’ANNO 
CON I MIGLIORI 
SOFTERISTI 


IL TELEFONO È 02-437.385 
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La vostra missione, in questo gio- 
co di avventura e prontezza di ri* 
fìessi, consiste nel muoversi attra- 
verso la contrada fino a raggiunge- 
re Il castello ed a salvare la princi- 
pessa - se ne siete capaci. Cl sono 
dragoni di ogni tipo da sottomette- 
re, ed un malvagio, subdolo mago 
che non smette di inseguirvi. Il gio- 
co ha quattro livelli di difficoltà. 
Originariamente scritto per 11 VIC 
privo di espansione di memoria, è 
stato adattato al C64* È necessario 
un Joystick* 


Q uesto gioco coinvolge tre corag- 
giosi cavalieri, tornati dalla guerra 
giusto in tempo per scoprire che la 
contrada circostante 11 loro castello è 
Infestata da dragoni pianati lì da un 
malvagio stregone. Una bellissima 
principessa è intrappolata nel castello, 
ed attende ansiosamente U primo ca- 
valiere che riuscirà a salvarla. Uno alla 
volta I cavalieri tentano di uccidere tut- 
tl 1 dragoni ed entrare nel castello per 
salvare la principessa. 

I cavalieri scoprono ben presto come 
la caccia presenti molle difficoltà e pe- 
ricoli. Un dragone divora chiunque si 
avvicini alla sua testa. L'unico modo di 
liberarsi di uno dì loro consìste nel col- 
pirlo allo stomaco. A guardia del ca- 
stello è posto un dragone fantasma 
che può essere eliminato solo quando 
tutti gli altri sono stati sopraffatti, (Il 
ponte levatoio del castello rimarrà al 
zato finché esso non sarà sconfìtto), A 
volte un dragone apparirà all'improvvi- 
so. e talvolta un dragone di cui pensa- 
vate esservi liberati riappare per cerca- 
re un'altra volta di divorare il cavaliere. 
E Infine, ma certamente non il minore 
dei perìcoli, lo stesso malvagio strego- 
ne In segue i cavalieri mentre essi sono 
a caccia del draghi. Se 11 mago rag- 
giunge Il cavaliere, questo viene ucci- 
so. 

Come al gioca 

Muovete II vostro cavaliere per la con- 
trada con il joystick. Disponete dì tre 
cavalieri al vìa, ma fate attenzione, essi 


vengono rapidamente divorati dai dra- 
ghi... 

Quando affrontate un dragone, dovete 
agire rapidamente. Usando il vostro 
pulsante di sparo, mirate allo stomaco 
del drago. Quello è il loro solo punto 
vulnerabile. 

La vostra unica difesa nei confronti 
dello stregone malvagio è la velocità. 
Dovete dare costantemente attenzione 
a quanto dista da voi. Ricordatevi: se vi 
raggiunge. Il vostro cavaliere è perdu- 
to. 

“Il Signore dei draghi'* (versione 
VIC 20) 

La versione originate de "Il Signore del 
draghi", realizzata per II VIC -20, utiliz- 
za un set di caratteri modificato da pro- 
gramma. Poiché sono necessari ben 
232 valori numerici per creare l 29 ca- 
ratteri speciali utilizzati in questo gio- 
co, è stato necessario creare una regi- 
strazione dei dati contenente I numeri 
e leggerla aillnizlo del programma per 
costruire I caratteri ridefinltL 
Il programma 1 è il programma princh 
pale che controlla II gioco. Il program- 
ma 2 è la registrazione dei dati neces- 
sari per definire il set di caratteri utiliz- 
zato dal gioco, (VI preghiamo di notare 
che, a causa della necessità di proteg- 


gere un blocco di memoria riservato al 
set di caratteri, la versione VIC funzio- 
nerà esclusivamente su un VIC privo di 
espansione di memoria. Siete quindi 
pregati di togliere eventuali cartucce 
di espansione RAM). 

Battete attentamente 11 Programma l, 
controllatene la correttezza, e registra- 
telo su nastro. Se mandate in esecuzio- 
ne il programma 1 mediante una Istru- 
zione ROM, cercherà di caricare i dati 
registrati che non sono ancora stati 
creati Quindi, battete NEW e copiate 
ìl programma 2, Fate attenzione nel 
battere questi valori numerici, poiché 
ogni errore provocherà caratteri mal 
formati. Quando siete certi che ogni 
cosa è a posto, mandate in esecuzione 
fi programma 2, Il VIC vi chiederà di 
premere E tasti Record e Play prima di 
cominciare a scrivere I dati su nastro 
subito dopo la registrazione del pro- 
gramma 1 . Dopo circa un minuto sullo 
schermo apparirà la scritta "REGI- 
STRAZIONE NASTRO CREATA" ed il 
nastro si arresterà. È consigliabile sal- 
vare una copia del programma 2 su di 
un altro nastro, così che, net caso in 
cui fosse nuovamente necessario, non 
dobbiate ricopiare tutti quei numeri, 

RI avvolgete II nastro completamente e 
battete LO AD per caricare ìl primo 
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programma. Quando II programma è 
stato caricato, battete RÙN. 

Livelli di difficoltà 

Inizialmente appariranno sullo scher- 
mo le istruzioni. VI si chiederà di sce- 
g fiere tra quattro livelli di difficoltà 
premendo un opportuno tasto di fun- 
rione. Il grado di difficoltà è dato dalla 
velocità con cui il mago insegue 11 ca- 
valiere. It livello FACILE (Ft) rappre- 
senta una vera sfida per i soli princi- 
pianti. Potete aspettarvi di essere bai 
tuli abbastanza spesso mentre impera* 
te a conoscere l punti critici dei gioco. 

I 2 livelli successivi, NORMALE (F3) e 
DIFFICILE (F5), hanno difficoltà cre- 
scenti I) livello MOLTO DIFFICILE 
(F7) è riservato agli esperti. Dovete es- 
sere particolarmente pronti di riflessi 
ed abili nell'ut II Izzare 11 joystick per 
riuscire ad entrare net castello a que- 
sto livello. 

"Il Signore del draghi" (versio- 
ne C 64) 


la versione C64 de “Il signore del dra- 
ghi”, funziona, suppergiù, come la ver- 
sione VIC. Tuttavia, i colori sono in 
parte differenti. Vi accorgerete sì esse- 
re rappresentati da una figura lampeg- 
giante In diverse tonalità di grigio, un 
effetto non implementabile sul VIC a 
causa della limitata capacità di memo- 
ria, Lo stregone che vi insegue lam- 
peggia con tutti I colori dell'arcobale- 
no (magieoi) e» tramite i suol poteri so- 
prannaturali, vi insegue dimezzando 
costantemente la distanza che vi sepa- 
ra. Se, in qualsiasi momento, il suo 
balzo lo porta ad una unità video di di- 
stanza da voi. siete spacciati. 

I dragoni rappresentano II principale 
ostacolo alla vostra cavalleresca av- 
ventura. Per eliminare un drago, dove- 
te porvi direttamente davanti al suo 
stomaco e premere il pulsante di spa- 
ro: Il dragone scomparirà. Il drago fan- 
tasma posto a guardia del ponte leva- 
toio deve essere eliminato per ultimo. 


VI accorgerete che i draghi si spostano 
qui e là ed a volte cambiano colore, ma 
si trotta di semplice Irrequietezza. Per 
di più un dragone apparirà occasional- 
mente dal nulla per mettere alla prova 
il vostro coraggio. 

Le tecniche di programmazione utiliz- 
zate in questa versione, cosi come nel- 
la versione VIC, sono piuttosto Imme- 
diate, Vengono utilizzati caratteri ride- 
flnlti per 1 dragoni 11 castello, 1 cavalie- 
ri ed il mago. I dati necessari sono Im- 
magazzinati nelle locazioni di memo- 
ria da 14336 a 16384, anche se solo 
una parte di essi viene utilizzata. I ca- 
ratteri vengono inseriti sullo schermo 
tramite istruzioni POKE, cosi come 11 
loro colore (le locazioni di colore dello 
schermo sul C64 vanno da 55296 a 
56295). Semplici effetti sonori vengo- 
no creati utilizzando due voci del chip 
SID. La prima voce controlla I dragoni 
ed 1 cavalieri, così come i suoni del 
ponte levatoio; la voce due genera i 
suoni associati al movimento. 
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Programma 1 

100 PRINT" {CLR}" ; IFFEEK (7443) »60ANDPEBK (7 
679) «160THEN125 ; rem 111 

105 PRINT" STO LEGGENDO I DATI" : rem 13 

110 OPEN 1,1,0, "DATI SD NASTRO" : rem 191 

115 F0RD-7448TO7679:INPUTf 1,A:POKEO,A:NEX 
T ; rem 116 

120 C LOS E 1 : POKE 5 6,29 treni 165 

125 CLR:PRINT"{CLRHBLKÌ":U-J6878:DR»15:K 
*2: JS* 3 7154 : P*7712:SW*0 ; Sl*U-2 : G0SUB2 
00 :GOSUB280 : rem 58 

130 22®7912: POKEZ Z , 35 : rem 9 

135 POKfiJS, 127:V-PEEK (JS- 2) AND 128 

sretn 216 

140 É*-{V*0) ; POKE JS *2/255 : V“ PEE K ( JS - 3 ) 

srem 197 

145 S*- ( (VANO 8) «0) ;W-- ( (VANDl6}-0) : K- - ( (V 
AND4) -0) : SW«- ( (VAND32) »0) lQ-P 

srem 194 

150 IFSANDPEEK (P+22) * 3 2THENF- P + 2 2 

: rem 221 

155 1 FW AND P EE K{ P- 1 ) » 3 2THENP» P- 1 : rem 132 
160 1 FNANDPEE K { P- 2 2 ) * 32THENF«P- 22 

srem 221 

165 IFEANDPEEK(P+1) -32THENP-P+1 ; rem ili 
170 P0KEP+3Q72Q,O trem 154 

175 GOSUB 4 20:1 FQ< > PTHE NPOKEQ ,32: PO KEP , 53 

srem 36 

180 IFSWTHENGOSUB375 srem 32 

185 1FPEEK ( P+l 1 « 3 70RPEEK ( P+ 1 } * 6 OORPEE K ( P- 
1) *4 2THENGQ5UB33Q :rem 9 

190 lFPEEK(P+22) *370RPEEK(P+22) «600RPEEM 
, P+22) •4 2THENGOSUB330 : rem 156 

195 GOSUB 4 7 0 : GOTOl 3 5 s rem 198 

200 PRINT" (GIU 1 } IL SIGNORE DEI DRAGHI" 

I rem 161 

205 PRINT" (GIU* }OBIETTIVO: UCCIDERE" : PRIN 
T "TUTTI I DRAGHI ED EM-" trem 146 
210 PRINT"TRARE NEL CASTELLO PER" : PRINT" 
(SU} SPOSARE LA PRINCIPESSA" trem 134 
215 PRINT" {GIU* ) ELIMINA I DRAGHI MET-":PR 
I NT " TENDOT ICI DI FRONTE E" srem 210 
217 PRINT "PREMENDO IL PULSANTE" t FRI NT "DI 


SPARO . " t rem 17 

220 PRINT" (GIU 1 } PER ULTIMO DEVI ELIMI-" :P 
RINT" (SU} NARE IL DRAGO FANTASMA" 

: rem 11 

225 PRINT SPRINT" PREMI : FI-FACILE" : PRINTTA 
9 (7) "F3-NORMALE" i rem 78 

230 PRINTTAB (7) "F5-DIFFICILE" : PRINTTAB (7) 
"F7- IMPOSSIBILE" trem 64 

235 SL* 1 5 : GETAS. : I FA§ « " "THEN2 3 5 s rem 211 
240 IFA$<CHR$ (134) ORA$>CHR$ (136) THEMFRINT 
"(CLR}"s RETURN tram 141 

24 5 IFA$«CHR$ £134) THENSL-10 SPRINT" (CLR}"s 
return tram 218 

250 I F A$ *CHR$ (135) THENSL” 6 : PRINT " ( CLR } " : R 
ETURN : rem 172 

255 SL- 3 5 PRINT" (CLR) RETURN : rem 99 

260 CL-INT(RND(1) *2)*2 tram 190 

265 C5” L+ 30 7 20 3 POKECS , C L : POKECS+ 1 , CL : POKE 
CS+ 22 , CL : POKECS+2 3 ,CL : rem 70 

270 P0REL , K : P0KEL+ 1 , M+l S POEEL+ 2 2 , M+ 2 t POKE 
L+23 # M+3: RETURN srem 195 

275 P0KBL, 32 : POKEL+ 1,32; POREL+22 , 32 t POKEL 
+23, 32; RETURN srem ' 17 

280 FORI-1T0126:PRINT"{ 4 SPAZI] tNEXT: P 
RINT" (HOME} ":POKE3890 5,0 5 rem 31 

285 POKEU+1 , 30 : PQRC* 7424T0743! : POKEC , 0 : NE 
XTj POKBU-9, 255 srem 95 

290 L»?B8a:K-45:CL«7:GOSUB265:POKE38629jG 
L : POKE 7 909 ,49: CL» 4 s L*L- 3 s M a 6 0 : GOSUB2 6 
5:F-36 tram 31 

295 FORX* 7 6 80 T07 7 0 1 : POKEX , F : NBXT : FORX» 7 7 0 
2T08 1 4 2STEP 2 2 : FOREX , F : POKEX+ 2 1 , F : NEXT 

s rem 20 

300 FORX" 8 1 64 TO& 1 8 5 : POKEX , F : NEXT : FORX» ITO 
1 5 : Z ■ INT { END ( 1 ) * 2 ) trem 198 

305 REÀDA : M“ 4 1 : L* 7 7 2 6 + A : I FZTHENM =37 

trem 105 

310 GOSUB 2 60 : NEXT : POKEU , 15 s P0KE7 712 , 53 : PO 
KE7693, 53 : POKE7 694 , 53 : rem 240 

315 DATAI, 15, 31,69, 101,111, 199,206,212,26 
8,275,316,353,362,367 srem 40 

320 FORX-49T052:POKE7909,X: FORESI, (X-44) * 
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28 : FORT» ITOIOOO : NEXT: NEXT: GOSUB 32 5 : RE 
TURN : rem 224 

325 POKEU,0 : FORESI , 0 : RETURN s rem 221 

330 POKEU, 15 ; FORF» 1T02 :FORX»130T0200 : POKE 
SlfXsNEXT : rem 191 

335 FORX s 200T0130STEP-l: POKZSl ,X:NEXT: POK 
EP , F+ 53 : NEXT: GOSUB 32 5 s rem 239 

340 POKE7695-K , 35 : K*K-ls IFK»-1THEN4 55 

srem 149 

345 POKEPf 32:P»7712 SPOKEP, 53 : RETURN 

srem 171 

350 L-P-21 SM-56 :CL*0:GOSUB265 : GOSUB4 00 sL» 
P- 21 :GOSUB275 : POKEU , 15 : rem B6 

355 PORX»52TO49STEP-lsPOKE7909,X: FORESI, ( 
X-44) *26 : FORT» ITO 1000 : NEXT: NEXT: GOSUB 
325 ire» 104 

360 PORX»7907TO7909 sPOKEX- 1,32 : POKEX+3072 
0 , 0 i POKEX , 53 ! FORT- ITO 1000 : NEXT S NEXT 1 P 
OKEX.32 : rem 60 

365 POKEU+1, 59: POKEU- 9, 240: PRINT" (CLR) " : P 
OKE214 , 22 i PRINT: PRINT" ( 4 DES }E VISSE 
RO X" : rem 35 

370 PRINT" {GIU' H 2 DESjLUVGO FELICI...": 

GOTO460 srem 126 

375 CL-0:X-PEEK (P+l) :Y»PEEK(P-1) : IFX-62AN 
DDR-0THBN350 . srem 227 

380 IFX0 39ANDY044THENRETURN srem 133 

385 IFX-39THENL«F-21:M-56!G0SUB265 

srem 78 

390 IFY»44THENL-P-24sM-56:GOSUB265 

s rem 74 

395 DR-DR-1 srem 104 

400 POKEU ( 15: FORX»250TO12BSTEP-l: POKES1 ,X 
: NEXT: GOSUB325 srem 13 

405 IFPEEK t P+l) »58THENL»P-21 1GOSUB275 

srem 228 

410 IFPEEK ( P— 1 ) »59THENL»P-24 : GOSUB275 

srem 230 

415 RETURN s rem 122 

420 H-INT(RND (1J *414) +7726 :BB»INT (RND (1) * 
2) : X*PEEK (H) S rem 7 

425 IFX-377HENL-H:K-41:GOSUB260: RETURN 

- ^ srem 190 

430 I FX* 4 1THENL» H s M» 3 7 s GOSUB 2 60 : RETURN 

srem 186 

435 IFHO7731ANDHO7B22ANDHO7B74ANDKO80 
0 SANDHC >8 10 6THENRETURN srem 107 

440 IFXO320RPEEK (H+l) < >320RPEEK (H+22) 03 

20RPEEK (H+23) 032THENRZTURN srem 162 

445 IFBB-1THENL-H :M»37: DR»DR+L s GOSUB 265 sR 
ETURN srem 186 

450 L-H:M-41:DR»DR+ltGOSUB265:RETURN 

srem 3 

455 POKEU-9, 240 sPOKEU+1» 59 SPRINT* {CLR}":P 
OKE214, 22 SPRINT! PRINT" { 2 DES Jl DRAGO 
NI VINCONO" srem 161 

460 FORX-1T02 3 SPRINT: FORT» ITOl 50 ’.NEXTsNEX 
T srem 36 

465 POKEU+1, 27:G0T0125 5 rem 31 

470 CW» (CW+1) AND 7 : IFCW»lTHENCW»2s rem 204 

475 POKEZZ+30720,CW:CC-CC+1:IFCC-SLTHEN4B 
5 srem 74 

480 RETURN : rem 124 

485 I Z» INT ( (ZZ-7680J/22) s IP-INT( (P-7680)/ 
22) :NZ»IKT( (IZ+IP)/2)*22 srem 219 

490 NZ»NZ+ (P-IP*22+ZZ-IZ*22) /2:GC»1 

s rem 22 

495 IFPEEK (NZ) -32THENPOKSZZ, 32: POKSNZ, 35: 

GOTO510 tre» 66 

500 IFPEEK (NZ) -53THENGOSUB330 srem 44 

505 RETURN srem 122 


510 ZZ»NZ S IFPEEK (ZZ+1) »5 30RPEEK { ZZ - 1) -530 
RPEEK { Z2+22) “530RPEEK ( ZZ-22) «53THENGO 


SUB330 

ireifl 

54 

515 RETURN 

: rem 

123 

Programma 2 



1 0PEN1, 1,2 ."DATI SU NASTRO" 

: rem 

96 

2 READXs PRINT# 1 ,Xs IFX»-1TNEN4 

srem 

100 

3 GOTO 2 

: rem 

156 

4 CLOSEl: PRINT* I DATI SONO STATI 

"SPRINTAR 

EGISTRATI SU NASTRO" 

: rem 

157 

5 END 

:rem 

12 


10 DATA60, 66, 165, 129, 153, 165, 66, 60, 170, 85 
,170,85,170,85,170,85,0,56,106,254,15 

srem 69 

20 DATAI 5, 31 ,31,0,0,0,0,1,6,12,152,255,63 
,63,31,31,15,31,61,176,176,152,216,220 

srem 40 

30 DATA252, 246, 224, 0,0, 0,0, 128, 96, 48, 25,0 
,28,54,127,240,240,248,248,13,13,25,27 

srem 78 

40 DATA 5 9, 6 3, 31 ,7,255, 252, 252, 24B.24B, 240 
,248,188,0,0,84,124,108,56,56,189 

srem 135 

50 DATA21, 31, 27, 31, 14, 14, 14, 94, 255, 255, 25 

5.255.170.255.255.0. 254.254.254.254.17 

0 srem 147 

60 DATA254, 254, 0,0, 0,0, 0,0, 0,255, 0,0, 0,0, 

32.24.6.1.0. 0.0.16.8.4.2.1.0.0.8 

srem 194 

70 DATA4, 4, 2, 2, 1,0, 24, 126, 90, 219, 24, 36, 66 
,195,0,24,60,90,24,36,0,0,0,0,0 

srem 208 

80 DATA24, 24, 0,0, 0,16, 0,2, 72, 2, 21, 75, 21,1 
30,16,64,162,72,160,90,224,7,42 

srem 216 

90 DATA133, 18, 5, 32, 4, 0,168, 210, 168, 64, 18, 

64.8.32.0. 40.68.82.5.10.21.10.0.0.0.0 

srem 254 

100 DATAI, 2, 4, 16, 85, 42, 21, 10, 21, 10, 21, 40, 

128,144,0,144,72,164,80,160,-1 

srem 153 

ERRATA CORRIGE 

Per un malaugurato errore di impaginatone, nel pro- 
gramma PACMAT versione per C64 pubblicato sul 
N. 2 della rivista è saltata una parte della linea 430. 
Diamo qui la linea corretta: 

430PRINTLEFTS (SS , 10) SPC (1 9) "7777" : PRINTS 
PC(18)"{su}8{siN}{SU}8" : rem 99 


Per lo stesso motivo, sono state invertite le versioni 
per VfC 20 e per C64 del programma PATHWAY. 

Mei programma MLX la linea 580 contiene un imper- 
fezione, che comunque non pregiudica il buon fun- 
zionamento del programma stesso. A causa di que- 
sta imperfezione non si ottiene il numero ci check* 
sum indicato sulla rivista. La linea corretta è comun- 
que la seguente: 


580PRINT" [<+>] "f srem 79 


Ci scusiamo con I lettori. 
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11 Signore del draghi 
versione per C64 


1000 

1010 

1020 


1025 

1030 

1040 

1050 

1060 

1070 

1080 


1090 

1100 


1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 


1290 

1300 

1305 

1310 


1320 


1330 


PRINT" (CLRl [<7>] * JPOICB532BO # 14:POKE5 
3281,6 : rem 137 

IFPEEK (14846) -8QANDPEBK (14847) =160TH 
EN1Q70 ; rem 143 

PRI NTTAB ( 10 } " { 6 GIU 1 } PER FAVORE ATT 
ENDERE " l PRI NTTAB ( 9 } " MENTRE I DATI VE 
NGONO" : rem 135 

PRINTTAB (17) "LETTI* i rem 171 

FOR I » ITO 2 4 : RE ADA : NEXT :r«H 123 

FORD >146 1 6T0 1 4 8 4 7 : RE ADA ; POKED , A : NEXT 
: POKZ52 , 57: POKE56, 57 :rera 216 

: : rem 0 

: : rem 1 

REM RI- INI Z IO PROGRAMMA : rem 236 

CLRi PRINT" {CLR} {<7>] " :DR«24 : K-2 : P=10 
B4:S1-5427$:S2-54283:GOSUB1260:GOSUB 
1490 trem 237 

POKE52- 1,13: POKES 2+1 , 8 : POKES 2+2 , 0 

: rem 193 

ZZ-1446:POKEZZ,35:GR(0) -ItGR(l) -12 :G 
R(2) »11:GR (3) -0:GR(4) »llìGR(5) -12 

:rem 147 

: : rem 253 

V-31-PEBK (56320) AND31iQ«P trem 173 

I FVAND 2 ANDPEBK ( P+ 4 0 ) “ 3 2THBNP-P+ 4 0 

trem 20 

1 FVAND 4 ANDPEBK { P- 1 ) » 3 2THEHP- P- 1 

trem 181 

I FV AND 1ANDPEEK ( P- 4 0 ) - 3 2THENP - P- 4 0 

: rem 25 

I FVAND 8 ANDPEBK (P+l) -32THENP-P+1 

: rem 183 

POKES 2, 8: POKEP+54272,GR (GR) :GR=GR+1: 
IFGR“6THENGR-0 : rem 135 

GOSUB1930 : IFQOPTHENPOKEQ , 32 tPOKEP, 5 
3: POKES 2 ,65: POKES 2- 3, 3 : rem 186 

I FVAND 16THENGOSUB 1800 : rem 98 

IFPEEK (P+l) -370RPEEK (P+l) -60ORPEEK (P 
-U-42THENGOSU81640 treni 99 

IFPEEK (P+40) -370RPEEK (P+40) -600RPEEK 
(P+40) -42THENGOSUB1640 treni 251 

GOSUB2090 :GOTO1120 : rem 71 

t treni 0 

: • treni 1 

REM ISTRUZIONI E LIVELLO DI DIPPICOL 
TA' treni 177 

PRI NTTAB ( 3 ) * * * * IL SIGNORE DEI DRAGH 
I 64 ***" tram 136 

PRINT" {GIU 1 ] OBIETTIVO: UCCIDERE TUT 
TI I DRAGONI ED" treni 79 

PR I NT "ENTRARE NEL CASTELLO PER SPOSA 
RE LA { 5 SPAZI} PRINCIPESSA." 

trem 227 

PRINT" ( 2 GIU ' } ELIMINA I DRAGONI KET 


TENDOTICI DI FRONTE" trem 239 

PRINT" {SU} E PREMENDO IL PULSANTE DI 
SPARO, MA STAI" trem 195 

PRINT" (SUjALLA LARGA DALLE LORO TEST 
El" trem 240 

PRINT" { 2 GIU'JPER ULTIMO DEVI ELI MI 
NARE IL DRAGONE! 4 SPAZI} FANTASMA. " 

: rem 69 

PRINT" { 2 GIU'H 2 SPAZIJPREMI ! Fi - 
- FACILE":PRINTTAB(9)"{GIU'}F3 -- NO 
RMALE" trem 67 

PRI NTTAB {9} " {GIU 1 }F5 — DIFFICILE" : P 
RINTTAB (9) " {GIU 1 }F7 -- MOLTO DIFFICI 
LE" trem 188 



T" {CLR} " i RETURN : rem 192 

1360 IFA$-"{ F3 } "THENSL-10 t PRINT" {CLR} ":RE 
TURN trem 233 

1370 I F A$ - " ( F5 } " THENSL- 6 : PRINT" { CLR} " : RET 
URN trem 192 

1380 SL- 3 t PRINT" {CLR}": RETURN trem 147 

1390 : : rem 7 

1400 t trem 255 

1410 REM DISEGNA E CANCELLA I DRAGONI, EC 
C. trem 143 

1420 CL- INT ( RND (1)*2)*2 trem 237 

1430 CS-L+ 54 2 7 2 : POKECS , CL : POKECS+ 1 , CL : POK 
ECS+40 , CL: POKECS+41 ,CL trem 121 

1440 POKEL, Mt POKEL+1 ,M+1 1 POKEL+4 0 ,M+2 1 POK 
EL+41 , H+3 : RETURN trem 243 

1450 POKEL, 32 : POKEL+1, 32 :POKEL+40, 32:POKE 
L+4 1 , 3 2 : RETURN trem 61 

1460 t trem 5 

1470 : trem 6 

1480 REM INI Z I ALI ZZA IL CAMPO DI GIOCO, I 
DRAGONI tram 123 

1490 POKE53265, 0: POKE532BO , 6 trem 43 

1500 POKE532Bl,Oi PRINT" {CLR} “ : POKE532B1 , 1 
5: F0RC-14592TO14599 :POKEC,0 : NEXT; OL- 
II trem 46 

1510 L-1404:M-45:GOSUB1430:POKE1443,49:L- 
L-3 :M-60 :GOSUB1430 :F-36 trem 215 

1520 FORX-1024TO1O63: POKEX,F:NEXT: FORX-10 
64TO194 4STEP40 tPOKEX ,F: POKEX+39 ,F : NE 
XT : rem 4 8 

1530 FORX- 1964TO2023: POKEX , F: NEXT t FORX- IT 
024 : Z-INT (RND (1) *2) trem 240 

1540 READ A : M-41iL-1106+A:I FZTHENM- 37 

trem 141 

1550 GOSUB1420 tNBXTi POKE53272, 31 :POKEl084 
, 53 : POKE104 7 , 53 : POKE1048 , 53 trem 228 
1560 DATAI, 30, 65, 82,91,138,203,222,234,30 
1,329,345,401,412,424,456,536 

t rem 170 

1570 DATA550, 567,632,690,706,724,734 

tram 61 

1580 POKE54296, 15: POKZ54277, 138 : POKE54278 
, 0 :POKE53265 , 27 trem 165 

1590 FORX-49T052 : POKE1443 ,X; POKES 42 7 3, (X- 
48) *10 1 POKES 1 , 8 : POKES 1, 17 trem 180 

1600 FORT- 1T0800: NEXT: NEXT: GOSUB1680: RETI) 
RN trem 64 

1610 : ' trem 2 

1620 t trem 3 
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1630 REM IL DRAGONE FANTASMA MUORE, VITTO 
RIA : reir. 180 

1640 P0RF*lT02 : FORESI, 8 : POKESl , 3 3 : FORX-OT 
O40STEP . 8 : POKES4273 , XiNEXT :IH 5 
1650 POKBS 1 , 8 : FOKES 1,33: FORX- 40TO0STEP- . 8 
: POKE54273 ,X : NEXT trem 137 

1660 PO KEP,F+53: NEXT: POKESl, 8 trem 27 
1670 POKB1049-K, 36: K-K-l: IFK<0THEN2O3Q 

:rem 183 

1680 POKEP , 32i P-10B4 : POKEP , 5 3 : RETURN 

trem 218 

1690 L-P-39:CL-lm-56:GOSUB143QiGOSUBlB60 
: L*P-39:GOSUB14 50 i FOKE53272 , 31 

: resi 223 

1700 POKE54277, 138 : POKE54 2 78 , 0 trem 151 
1710 F0RX-52T049STEP-1 : POKB1443 ,X : POKESl, 
8 : POKESl, 33: POKE54273 , (X-4B) *10 

: rem 70 

1720 FORT* 1TOB00 : NEXT: NEXT: POKESl , 8 

:rem 241 

1730 F0RX-1441T01443 :POKEX-l, 32: POKEX+542 
72 , 1 : POKEX , 53 : FORT* 1TO800 : NEXT i NEXT 

: rem 226 

1740 PRINT" {CLR} ” : POKE53280 , 7 : POKE532B1 , 7 

tran 205 

1750 POKE53272, 21 :PRINT n {CLR} [<2>J ”TAB (11 
)"£ 22 GIU'IE VISSERO A LUNGO” 

ina 59 

1760 PRINTTAB ( 15) " {GIU 1 ] FELICI ..." :GOTO20 
50 ; rem 174 

1770 t :rem 9 

1780 : :rem 10 

1790 REM ELIMINA UN DRAGONE : rem 87 

1800 CL*0: X*P£EK (P+l) : Y-PEEK (P-l) : IFX-62A 
NDDR-0THEN1690 : rem 69 

1810 IFXO 39ANDY< >4 4THENRETURN : rem 180 

1820 IFX-39THENL-P-39 :M*56 :GOSUB1430 

tram 173 

1830 IFY-44THENL-P-42 :M-56 :GOSUB1430 

: rem 165 

1840 DR-DR-1 : rem 148 

1850 : : rem B 

1860 POKESl, 8: POKESl, 129: FORX- 20TO0STEP-. 
25: POKE54273,X:NEXTi POKESl, B 

: rem 64 

1870 IFPEEK (P+l) -58THENL-P-39 :GOSUB14$0 

t rem 80 

1880 IFPEEK (P-l) *59THBNL*P-42:GOSUBl450 

: rem 78 

1890 RETURN tram 176 

1900 i tram 4 

1910 : treni 5 

1920 REM VOLTA IL ORAGONE / NE CREA UNO N 
UOVO tram 49 

1930 H-INT (RND (1) *835) +1106 : L-H :BB-INT{RN 
D(l) *2) :X-PEEK(H) : rem 66 

1940 IFX-37THENM-41 : GOSUB1420 : RETURN 

: rem 21 

1950 IFX-41THENM- 37 :GOSUB1420: RETURN 

: rem 22 

1960 I FRND ( 1) > . Q33THENRETURN : rem 214 

1970 FORI*-80TO120STEP40: PORJ--2TO3 : IFPEE 
K (H+J + I) 032THENRETURN treni 228 

1980 NEXT : NEXT : M-4 1 : DR-DR+1 : I FBB- 1THENM- 3 




7 

trem 

144 


1990 

G05UB142Q: RETURN 

: rem 

52 

2320 

2000 

: 

: rem 

252 


2010 

: 

: rem 

253 

2330 

2020 

REM 1 DRAGONI HANNO 

VINTO : rem 

249 


2030 

PRINT" {CLR} " : POKE53280 , 2 : POKE5320 1 , 2 

2340 


itera 188 


2040 


2050 


2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 


POKS53272 , 21 tPRINT" (CLR} [<3>] "TAB(11 
)"{ 24 GIU'Jl DRAGONI VINCONO" 

: rem 138 

FORX- ITO 2 3 1 PRINT : FORT- ITO 1 50 : NEXT : NE 
XT: POKE532SO, 14 : POKE53281, 6 :GOTO108Q 

tram 87 

i : rem 2 

> : rem 3 

REM IL MAGO CATTIVO SI SPOSTA 

:rem 247 

CW- (CW+ 1 ) AND 1 5 : I FCW- 1 5THENCW- 0 

treni 94 

CC-CC+1 1 POKEZZ+54272,CW: IFCCOSLTHEN 
RETURN ;rem 241 

1 2 * I NT ( (ZZ- 1024J/40) : IP*INT( (P-1024) 
/40) : NZ-INT ( (IZ+IP) /2) *40 treni 226 

NZ-NZ+(F-XP*40+ZZ-IZ*40)/2 :CC*1 

: rem 62 

IFPEEK (NZK>32THENRETURN i rem 97 

POKEZZ , 32 i POKENZ , 35 : ZZ-NZ : POKEZZ+542 
72, CW trem 197 

ZZ-NZ: IFPEEK (28 + 1) -530RPEEK (ZZ-1) -53 
ORPEEK (ZZ+40) -53THENGOSUB1640 

:rem 156 

IPZZ>1103ANDPEEK (ZZ-40) -53THENGOSUB1 
640 trem 188 

RETURN trem 170 

! : rem 5 

: : rem 6 

DATA60, 66, 165, 129, 153, 165, 66, 60, 170, 
85,170,85,170,85,170,85 trem 151 

DATA0 , 56,108 , 2 54, 1S, 15, 31, 31, 0,0, 0,0 
,1,6,12,152 trem 248 

DATA255,63,63,31,31,15, 31,61, 176,176 
,152,216,220,252,248,224 trem 171 

DATA0, 0,0, 0,128, 96, 48, 25, 0,28, 54, 127 
,240,240,248,248 trem 23 

DATA13, 13, 25, 27, 59, 63, 31, 7, 255, 252, 2 
52,248,248,240,248,188 trem 95 

DATA0, 0,84, 124, 108, 56, 56, 189, 21, 31, 2 
7,31,14,14,14,94 trem 27 

DATA255,255,2S5, 255, 170,255,255,0,25 
4,254,254,254, 170, 254, 254,0 trem 82 
DATA0, 0,0, 0,0, 0,255, 0,0, 0,0, 32, 24, 6, 
1*0 trem 87 

DATA0 ,0,16,8,4,2,1,0,0,8,4,4,2,2,1,0 

trem 213 

DATA24, 126, 90, 219, 24, 36, 66, 195, 0,24, 
60,90,24,36,0,0 tram 237 

DATA0, 0,0, 24, 24, 0,0, 0,16, 0,2, 72, 2, 21 
*75,21 : rem 245 

DATA130, 16,64, 162,72,160,90, 224,7,42 
,133,18,5,32,4,0, trem S8 

DATA168, 210, 168 , 64, 18,64, B, 32, 0,40, 6 
8,82,5,10,21,10 trem 230 

DATA0, 0,0,0, 1,2,4,16,85,42,21,10,21, 
10,21,40 tram 86 

DATAI 28, 144, 0, 144 ,72,164,80,160 

trem 23 
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SOFTWARE 

SPECTRUM 


E DUCATI VI /DI PATTICI 

GRAFICA PER TUTTI 



J/0 100-01 L 25 000 


MANUALE DI GEOMETRIA PIANA 



MANUALE DI GEOMETRIA SOLIDA 

praC^Anjnww ni foto df nonttini toitòa, Inni: 
C#«da di volumi, tuparf tct, lattoni, «[. 

Aitilo kngntoatgbUa par iludtnli, prgfawonJiii « cfclunqu» 


di iHii.niii qunii prtUimi 1 1 irimlvl ulfloir 



J/C 100-04 L 25 000 


GIOCHI 



i/tnoi-oi 


L, 20.000 


BATTAGLIA NAVALE 



• par ogni tiro diri radaguato n 
Olindo un pOerttra «Monda luti •# wH dai amaraark) 
enttpn li tarliti "VITTORIA - a v 
Ni 


Conftpimdani defittila *• K RAM 

J/0101-02 L. 20.000 


PUZZLE MUSICALE 



SUPER EO 



“jce 


APPLICATI VI/GESTIONALE | 


SPECTRUM WAITIR 

MlCAODftlVE COMPATIBILE 
IPiCTRUM WRIT£« « .1 p 



INZXPRlNTta 

ha SEIAQSkA MS « la AlPHACOM 22 
Gm *'**** hittMn! p a tit ili oottapn qvM 


i/0102-01 48,1 "™ Wl t O 4Ó.000 

MASTER FILE * MtCftODRIVE COMPATIBILE 
imi» dwuia H im pomi» d 
I aiPduMawn# A Ittat ogp d 

d i titMotì iA ffHf* 17 In 

■paHdnuii 



Con rifluii iom riattiti: 41 A RAM. fi 

4/010202 


L- 40.000 


TECNICO/SCIENTIFICI 


IMO.V CALCOLO *0 ELEMENTI FINITI 

Anttì trtmjotifi, pii iTÉtlt di ìndlZM In nunltn IMGiil 



i/0104-02 


CALCOLO TRAVI IPE 

» I cMrato d ww* (Pf . * 


L 30.000 



Conflpjritiom richlatto: *9 K RAM 
4 / 0104-04 


L- 30 000 



L 30,000 


STUDIO 01 FUNZIONI 
E* un pifW par dufin «n dia 
aflpaftddi tactotu 
A poaa ù« ai mw 

1 mSLaLm«hM«wwÌ 

a fuMtana a m pud J n y mdt n i lutto 



L 30 000 



| HOME/DOMESTtCO 





CBM 64 


Vie 20 


GIOCHI 



f~C»dola di commiiiiona da inviare a 
1 JC£ ■ Via dal Lavoratori, T24 * 20OG2 Dniaaflo 8. * MI 


inviatami i seguenti programmi; 


c«i profc atà 

oh piar a i* cm prò* 

Q Ci 

i i 1 [ I 1 [ t 1 

6 «I p«P«r Ou, 

Cod profr 0 la God pregi 

Ota 

r i r 

, . l 1 1 

| | 

Cod «rogr Oli 

Cad pregi Oli Coti tatuar 

ota 

r r t r 

1 IL 

1 1 

t>M(ta*Q IKf<M«Mana 

la mdw«tp «A lattaia, a **r» pacco 





Nota Q 

li LLLL II 1 II 1 1 

rrm 

caanaM# | 

HI! 

MIN 

* LLL 

1 1 1 1 11 1 1 II 1 1 1 

nm i 

o*. i i i i r r i r ti nini 

lini 

m 

111 1 1 III 

m 1 1 

WAOOltttM 

ITO ALLA JZlMCt ■« AOMGf UflM&OM 


Pana» iva 

rrrm i ri i i i r 

LI II 






















SOFTWARE 


TH£ PII 


| EDUCATIVI 

TURTLf GRAPHICS 


PER LE ORDINAZIONI, USARE IL MODULO BORDINE DELLA PAGINA SEGUENTE 


IH 

TORO 


GIOCHI 



CBM 64 

rz 

EDUCATIVI 


UTILITÀ' 


UTILITÀ' 


APPLICATIVO GESTIONALE | 


GIOCHI 


APPLICATIVO GESTIONALE 


rnw tjj nudista 












Q uesto programma di utilità pratica 
lista tutte le variabili contenute nel 
vostro programma, incluso il Loro tipo 
(semplice, di stringa, a piu 
dimensioni). È un utile supporto, so 
prattutto per il controllo di programmi 
molto lunghi o per scrivere Ja docu- 
mentazione dei vostri programmi, È 
adatto sia al VJC che al C64. 

Q sono due tipi di variabili, semplici ed 
a più dimensioni, e tre categorie per 
ogni tipo, numeriche a virgola mobile, 
numeriche intere e alfanumeriche. 
Tutte queste variabili vengono ìmme 
ga zzi nate nella memoria del VIC e del 
C64 immediatamente dopo il pro- 
gramma BASIC. 

Le variabili semplici vengono memo- 
rizzate al di sotto delle variabili a più 
dimensioni, a partire dalla locazione 
Individuata dal puntatore contenuto 
nelle locazioni di memoria 45 e 46, 
Ognuna di queste variabili semplici oc- 
cupa sette byte di memoria, I primi 
due byte contengono I primi due carat- 
teri (in ASCII) dei nome della variabile, 
con una codifica che ne indica 11 tipo. 
Questa codifica è semplicemente otte- 
nuta aggiungendo 128 al codice ASCII 
di entrambe i caratteri se si tratta di 
una variabile intera, e sommando 128 
al scio secondo carattere, se si tratta di 
una variabile alfanumerica. Nessuna 
codifica contraddistingue le variabili a 
virgola mobile. I byte rimanenti con- 
tengono li valore attuale della variabi- 
le. Nei caso di una variabile alfanume- 
rica, l byte rimanenti contengono la 
lunghezza della stringa e la locazione 
all'inizio della memoria che contiene il 
primo carattere della stringa. 

Le variabili a più dimensioni o matrici 
sono piuttosto diverse, in quanto le di- 
mensioni della variabile sono determi- 
nale dal numero di elementi della ma- 
trice, Le Informazioni che devono esse- 
re memorizzate per una variabile a più 
dimensioni comprendono il nome del- 
ia variabile, che viene codificato nello 
stesso modo di una variabile semplice, 
un puntatore alla locazione di memo- 
ria che contiene la variabile successi- 
va, il numero delle dimensioni della 
matrice, ed II numero degli elementi 
contenuti nella matrice. 

Inoltre, deve essere memorizzato il va- 


lore di ogni elemento nel caso di ma- 
trici numeriche, o II puntatore alla 
stringa e la sua lunghezza nel caso di 
matrici alfanumeriche. Come potete 
vedere le variabili a più dimensioni si 
possono mangiare aran parte dello 
spazio in memoria. E conveniente uti- 
lizzare il minor numero possibile di 
elementi nelle matrici. Se non specifi- 
cate le dimensioni di una matrice, il 
calcolatore la fisserà a dieci elementi. 
Se ne avete bisogno meno di dieci, ri- 
sparmierete un minimo di cinque byte 


per elemento se stabilirete le dimen- 
sioni della matrice con una istruzione 
DIM (-dimensionamento). Anche se 
una variabile semplice intera occupa 
nel complesso lo stesso spazio In me- 
moria di una variabile a virgola mobi- 
le, si possono risparmiare tre byte per 
elemento se utilizzate variabili intere 
al posto di quelle in virgola mobile nel- 
le matrici. 

VI caricamento del programma 

"Lista Variabili" è un programma in 
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linguaggio macchino che viene corica* 
to tramite delle Istruzioni POKE da un 
programmo BASIC, La qual cosa ellmi- 
no la necessiti di disporre di un as&env 
blatore, Il linguaggio macchino è auto* 
melicamente caricato olla fine dello 
memoria c protetto dai vostri pro- 
grammi BASIC, Prima di mandare in 
esecuzione con il ROM questo prò* 
grammo, assicuratevi di averne regi* 
strata una copia poiché esso autodi* 
strugge dopo essere stato eseguito. 
Dopo che la parte in linguaggio mao 
china sia stata caricata, il programma 
caricatore vi segnalerà la locazione di 
memoria do attivare con una istruzio* 
ne SYS quando volete lo listo delie vo* 
sire variabili. Per esempio, con una 
espansione di memoria do 16K inserita 
nel vostro VIC, dovrete battere 
5YS24320 per ottenere la lista delle 
variabili. U programma elencherà qutn* 
di le variabili semplici nell'ordine in 
cui appaiono nei programmo stesso, 
con Indicazioni circo il Joro tipo. Sue* 
cessivamente vengono elencate le va- 
riabili e più dimensioni con indicatori 
di tipo opportuni. 

"Lista Variabili" é particolarmente uti- 
le quando scrivete programmi con 
molte variabili e vi trovate nella neces- 
sità di Inventare nuovi nomi per le va- 
riabili stesse. È anche un valido stru 
mento per la documentazione dei pro- 
grammi uno voita terminati. 

Le variabili vengono elencate in senso 
orizzontate sullo schermo per evitare 
che scorrano oltre ad esso (scroti ing). 


Se avete una stampante, te modifiche 
seguenti possono essere apportateci 
programmo originale per daravl un 
elenco di più facile lettura. 

160 IF PA 0 33632 THE N PRthTT "ER* 
RORE NEI DATI"] END 
260 DATA 32,2 1 0,255. 1 69. 1 3,32.2 1 0 
420 DATA 41 32.210, 255.1 69, 1332. 
Per inviare i‘e lento alia vostra stam- 
pante. limitatevi ad aprire un file per la 
stampante stessa: 

OPENl t 4;CMDl:SYS XXXXX 

Il programma BASIC di cui volete otte- 
nere reieneo delle variabili deve essere 
mandato in esecuzione con il RUN pri- 
ma che voi attiviate il programmo “Li- 
sta variabili" con uno SYS. Questo per- 
ché le variabili non sono inserite in 
memoria finché un programmo non 
viene mandato in esecuzione. 

Puntatori ad indirizzi di memo* 
ria 

Più volte incontrerete riferimenti a 
"puntatori" all'interno delia memoria 
di un calcolatore. Essi sono del numeri 
di due byte di lunghezza, generalmen* 
te posizionati nelle prime 256 celle di 
memoria del computer, che contengo- 
no degli importanti indirizzi. 

La situazione muta nel corso del rese* 
cui lo ne di un programma o nel corso 
della sua scrittura. Ad esemplo, se ag- 
lungefe una riga ad una programma 
ASIC voi avete aumentato lo spazio 


totale che il programma occupa nelle 
memoria ad accesso casuale (RAM). 
Ovviamente, quando vi accingete a re- 
gistrare Il programma, il calcolatore 
deve sapere dove il programma BASIC 
termina. Quindi, registra la "fine attua- 
le del programma BASIC" tramite un 
puntatore. Questo puntatore è posizio- 
nato (sia nel VIC che nel C64) agli indi- 
rizzi di memoria 45 e 46. Il numero 
contenuto nella cella 46 viene moltipli- 
cato per 256 e sommato a quello con- 
tenuto nella cella 45. Per sapere a qua- 
le indirizzo deila memoria RAM termi- 
na 1! vostro attuale programma BASIC, 
potete battere: andare a capo e lasciare 
spazi sopra e sotto ?PEEK (45) + 
PEEK (46) * 256. 

Cè anche un certo numero di altri pun- 
tatori. comprendente "limite della me- 
moria", "inizio delie matrici", "registro 
stringhe alfanumeriche" « "inizio del 
BASIC. Le locazioni di questi punta- 
tori sono elencate nelle "mappe di me- 
moria" di ogni calcolatore. Sono an- 
che spesso disponibili presso i gruppi 
di utenti. Ci sono alcune cose Interes- 
santi che potete fare manipolando 
questi puntatori con delle istruzioni 
POKE. Ad esempio, potete Ingannare 
il calcolatore riservando spazio in me- 
moria in modo che due programmi 
BASIC Indipendenti possano essere 
eseguiti simultaneamente. Comunque. 
1 puntatori contengono informazioni 
essenziali per li calcolatore, ed li loro 
valore può essere reso accessibile uti- 
lizzando la formula suddetta. 


Lista variabili 
versione per VIC 20 e C64 


120 ME-PBEK(55)+256*PEEK(56) : rem 21‘ 

130 VS-KE-256:PA-0 :rem 14 

140 POKB56 , PEEK (56) ~1 s rem 154 

150 FORI ■ VSTOVS+ 2 4 0 : READA : POKE I , A : PA« PA+ A 
: NEXT tram 237 

160 IFPA<>33$70THENPRINT"ERRORE NEI DATI* 
! END I rem 18 

170 PRINT" SYS"VS" PER ATTIVARE" : NEW 

:rem 192 

180 DATA165, 45, 197,47, 240, 93, 133:rem 101 

190 DATA253, 165,46, 133, 254, 160,0:rem 85 

200 DATA 16 9, 0, 141, 61 ,3,177,253 :rem 237 
210 DATA41, 128, 208, 60,177, 253, 41:rem 83 
220 DATA127, 32, 210, 255, 200, 173,61 

t rem 120 

230 DATA3, 201, 0,208, 6, 177, 253 ! rem 182 

240 DATA41, 128, 208, 46,177, 253, 41:rem 90 
250 DATA 127,32,210,255,173,61,3 :rem 28 
260 DATA32, 210, 255, 169, 32, 32, 210s rem 75 
270 DATA255 ,152,24,105,6,144,5 :rem 239 
280 DATAI 64 ,254,200,132,254,168,101 

:rero 230 

290 DATA253, 197,47,240,17,208,186 

:rem 154 

300 DATA96, 169, 37,141,61,3,208 : rem 248 

310 DATA189, 169, 36,141,61, 3,20B ! rem 43 


320 DATA203,165,49, 197, 47,240, 114 

: rem 

330 DATA165, 47, 133,253,165, 48, 133 

t rem 

340 DATA254, 160,0,169,0,141,61 :rem 
350 DATA3, 177, 253, 240, 216, 41, 128! rem 
■360 DATA208 ,77,177,253,41,127,32: rem 
370 DATA210, 255 ,200,173,61,3, 201: rem 
380 DATA0, 208,6,177,253,41,128 : rem 

390 DATA20B , 63,177,253,41,127,32: rem 
400 DATA210, 255,173,61,3,32,210 : rem 
410 DATA255 ,169,40,32,210,255,169 

: rem 

420 DATA41 ,32,210,255,169,32,32 : rem 
430 DATA210, 255, 200,177,253,24,101 

: rem 

440 DATA253, 197,49, 240,39,177,253 

: rem 

450 0ATA24, 101, 253, 170, 200, 177, 253 

: rem 

460 DATAIOI.254,133,254, 134,253, 208 

: rem 

470 DATA165, 96,169,37,141,61,3 : rem 

480 DATA20B ,172,169,36,141,61,3 ;rem 
490 DATA208,186, 165, 48,197, 50,208 

: rem 

500 DATA136, 96, 200, 234,177, 253,101 

: rem 

510 DATA254 ,197,50,240,224,16,222 
520 DATA 136,208,202 irem 


liì 

143 

232 

85 

96 

69 

246 

94 

19 

139 

27 

171 

1S7 

176 

231 

2 

43 

160 

182 


132 

209 
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di ft. Dtidley 

trad. ed adatL di U. G. Barzaghi 


Cylon Zap è un gioco simile a quelli 
diffusi nelle sale giochi (In Inglese 
"arcade") per II VIC 20 fornito di 
espansione di memoria da 8K byte, e 
per li Commodore 64. Una stazio* 
ne spaziale al centro delio scher- 


mo, che voi dovete difendere a qua- 
lunque costo, è continuamente at- 
taccata dal caccia di Cylon. Dovete 
abbatterli prima che si buttino (ti- 
po kamikaze) sulla stazione spazia- 
le. 


P er difendervi dai Cylon», avete due 
armi a disposizione. La prima i rap 
presentata dal joystick, che può essere 
spostato su, giù, a destra ed a sinistra 
per azionare I laser in ciascuna di que* 
ste quattro direzioni. La seconda è co- 
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stillili* dal pulsante dì sparo del joy- 
stick, che Innesca una bomba M r 
(l'Iniziale sta per "furba”), che libera 
immediatamente lo schermo da ogni 
attaccante. Le bombe “F* devono esse- 
re usate con parsimonia, poiché ce se 
sono solo tre disponibili all'inzio del 
gioco. 

Il punteggio ed il numero di bombe ri- 
manenti vengono costantemente ag- 
giornati nell'angolo in alto a sinistra 
dello schermo. Quando il punteggio 
raggiunto è 30, gli assalitori sui fianchi 
iniziano ad aumentare la loro velocità. 
Quando è 50, anche gli attaccanti 
dall'alto e dal basso aumentano la loro 
velocità. Se il vostro punteggio supera 
1 60 punti, vi aggiudicate delle bombe 
■'F T extra. 

Se il vostro punteggio finale è un nuo- 
vo record da quando il programma è 
stato inizialmente caricato, potete in- 
serire le vostre Iniziali tramite 11 joy- 
stick. Muovendolo a destra e a sinistra, 
potrete spostarvi attraverso te lettere 
dell'alfabeto, in avanti ed Indietro. 
Quando trovate la lettera giusta, pote- 
te selezionarla con il pulsante di sparo. 
Fate attenzione a non tenere premuto 
troppo a lungo il pulsante di sparo 
quando selezionate te voste iniziali, al- 
trimenti potreste scegliere inavvertita- 
mente le lettere sbagliate. 

La versione di "Cykrn 2ap f per il ViC 
20 è In tre parti. La prima parte rtdefl- 
nisce la locazione di partenza dei pro- 
grammi BASIC per creare spazio per 
un set di caratteri rldefinito. Carica an- 
che la seconda parte, che inserisce in 
memoria I caratteri speciali e permette 
di leggere le Istruzioni. La terza parte 
contiene il gioco vero e proprio. Ogni 
parte deve essete battuta separatamen- 
te e quindi salvata su nastro. Se vengo- 
no salvate In sequenza, il gioco verrà 
caricato senza Intoppi. Se utilizzate 
una unità dischi, sarete costretti a cari- 
care la seconda e la terza parte ma- 
nualmente quando la scritta “Press 
Play On Tape” apparirà sullo schermo. 
La versione di “Cylon Zap" per il Com- 
modore 64 consiste in un'unica sezio- 
ne a causa della maggiore memoria di- 
sponibile per II C64. Per ogni altro 
aspetto il gioco è fondamentalmente 
Identico. 


(Incanalisi dettagliata della versione VIC 

Ecco alcuni brevi commenti alla versione VIC di Cylon Zap. Queste infor- 

mazionì sono destinate ai lettori interessati alle tecniche utilizzate. 

Programma 1 : Preparazione (VIC 20) 

— Iniziai izza il puntatore all'Inizio del programma BASIC. 

— inizializza entrambi l puntatori olia fine della memoria. 

— Inizializza l'inizio del programma BASIC a O, 

— Mostra 11 messaggio sui byte disponibili. 

— Inserisce una istruzione LOAD nel buffer della tastiera. 

Programma 2; Istruzioni speciali (VIC 20) 

30 

Putisce lo schermo, inizializza 1 colori video, entro in mi- 


nuscolo 

35 

Uscita del titolo 

40-70 

Carica 1 caratteri 

75 

Carica la routine in linguaggio macchina, pone la do- 


manda circo le istruzioni 

90 

Inserisce tramite una istruzione POKE un comando 


LOAD nel buffer della tastiera, pulisce lo schermo. 

95-125 

Istruzioni DATA per i caratteri 

130-160 

Istruzioni 

165 

Istruzione di RETURN per fra proseguire il messaggio 

170-180 

Istruzioni, RETURN per dare il comando di LOAD 

190-230 

Sottoprogramma per il messaggio “Premi RETURN" 

235-290 

Titolo di apertura 

300-310 

Routine per muovere il titolo attraverso lo schermi 

400-513 

Routine di inserimento del linguaggio macchina. 

Programma 3: Cylon Zap (VIC 20) 

35-50 

Ini zia llzzaz Ione delle variabili 

55 

Iniziai 1 zzazi one del colore delio schermo, pulizia dello 


stesso, quindi viene mostrato il punteggio record 

60 

Inizia li zza zio ne del puntatore al set di caratteri 

70-80 

Viene pulito lo schermo e viene disegnata lo base 

90 

Mostra il punteggio, le basi e le bombe rimaste nell'an- 


golo superiore sinistro 

150-225 

Il caccia nemico compare, si muove e colpisce 

230 

Se non rimangono altre basi, viene mostrato il punteg- 

233 

gio 

Punteggio di 50 o più, le astronavi si muovono più rapi- 


damente 

235 

GOTO all'Inizio della routine del joystick 

240-315 

Disegna la base 

320-340 

Aziona il laser superiore 

345-365 

Aziona il laser inferiore 

370-390 

Aziona il laser di sinistra 

395-415 

Aziona II laser di destra 

420-465 

Musica per l'introduzione delle Iniziali 

470-475 

Istruzioni DATA per 11 motivo musicale 

480*525 

Esplosione per colpo a segno su di una caccia nemico. 


viene aumentato il punteggio 

530*580 

Sottoprogramma per basi e bombe extra 

585-615 

La base esplode 

620-650 

Se il punteggio è fra quelli record, riordina gli altri pun- 


teggi 

655-685 

Mostra i punteggi record ed offre la possibilità di gioca- 


re ancora 

690-725 

Grafica dell'esplosione della base 

730*015 

Sottoprogramma per l'introduzione delle Iniziali 

820-850 

Mostra i punteggi ed il tìtolo 

855*895 

Esplosione delle bombe "F‘ e aggiornamento dei pun- 


teggio 

900 

Allarme dell'astronave 

905-925 

Sottoprogramma di stampa delle iniziali inserite 


Cylon Zap versione per VIC 20 
Programma 1 

10 POKE52, 56: POKE56 , 56 : POKE44 , 28 : POKE716B 
, 0: POKE631 ,131 : POKE198 , 1 team 39 

20 PRINT" (CLR j **** CBM BASIC V2 *»**"! PRI 
NT"{SIN} n FRE(0) ; "BYTES FREE" : rem 0 


Cylon Zap versione per VIC 20 
Programma 2 

30 PRINT" {CLRJ " : POKE36879 , 8 i POKE36B69, 194 

:rem 232 

35 GOSUB235 :rem 130 

40 PRINT- { 3 GIU' } {RVSlCARICAMENTO 

{ 2 SPAZI }CARA{ 2 T}ERT" Temi 63 


supwwe* m * 51 



45 FORA"5120TO7167iPOKEA,PBEK(A+27648) : NE 



XT 

; rem 

74 

50 

FORA” 5 38 4 TO 5 504 

t rem 

15 

55 

RE ADO 

: r eni 

202 

60 

I FD < > - 1THBNPOKBA , D : NEXT 

t rem 

153 


65 F0RA*5584T05632tREADDt IFDO- 1THENP0KEA 
, d : next tram 32 

70 F0RA*5336T05359tREADD:P0KEA r D:NEXT 

: rem 67 

75 GOSUB400: PRINT" (SU) ISTRUZIONI {OFF} 
{rvs } s { off } o {rvsJnTòffT - " frem 6 
8 0 GETA$ : I F AS • 1 " " THENPOKE 3 8 3 4 0 , I NT ( RND ( 1) * 
7+1) : POKE38344 , INT {RND ( 1) +7+1) :COT080 

i rem 28 

85 IFA8*"S"THBNPOKE36869,192:GOSUB130 

: rem 18$ 

90 POKE36869,192:POKE198,ltPOKE63l,131:PR 
INT” { 2 GIU* }{CLR} ATTENDERE CARICAMENT 
O" : END : rem 47 

95 DATA24, 24, 60, 126, 24, 24, 126, 255, 1,19, 51 
,255,255,51,19,1,128,200,204,255,255,2 
04,200 tram 121 

100 DATA12B, 255, 126, 24, 24, 126, 60, 24, 24, 24 
,24,60,24,60,126,219,195,3,7,44,254,2 
54,44,7,3 tram 222 

105 DATA192, 224, 52, 127, 127, 52, 224, 192,195 
,219,126,60,24,60,24,24,16,8,16,8,16, 
8,16,8 tram 92 

110 DATA145, 74, 44, 113, 142, 52, 82, 137, 0,0,0 
,170,85,0,0,0,-1 tram 244 

115 DATA0, 0,0, 117, 85, 117, 69, 71, 0,0, 0,87,1 

14.114.114.82.0. 0.0.64.64.64.64.64 

tram 120 

120 DATA0, 0,0, 206, 170, 206, 170, 202, 0,0, 0,2 

32.136.232.40.232.0. 0.0.0.0.0.0.0,-1 

«reo 130 

125 DATA0, 0,0, 206, 170, 202, 170, 206, 0,0, 0,1 

39.218.171.138.139.0. 0.0.56.160.48.16 

0,56 tram 196 

130 PR I NT "{CLR}{ REDI BENVENUTI A CYLON ZAP 

" tram 117 

135 PR I NT" AVETE UNA BASE CHIAMA-TA ALPHA" 

tram 169 

140 PRINT"{GID‘ } {CENILA VOSTRA MISSIONE E 
1 DI PROTEGGERE UN REAT-TORE NUCLEARE 
DALLE" tram 189 

145 PRI NT" {PUR} ASTRONAVI KAMIKAZE* 

tram 11 

150 PRINT* {GIU 1 }{GRN} AVETE A DISPOSIZIONE 
4 LASER CONTROLLATI DAL JOYSTICK" 

tram 35 

155 PRINT" (GIU' ){ BLU} AVETE ANCHE BOMBE 'F 
1 INNESCATE DAL PULSANTEDI SPARO" 

t rem 82 

160 GOSUB190 tram 177 

165 PRINT" {CLRHYELJDOVETE SOLO PUNTARE I 

LC ANNONE E IL LASER FA FUOCO AUTOMATI 
C amente" tram 13 

170 PRINT" {GIU' I {PUR} LE ASTRONAVI VOLERAN 
NOTANTO PIU’ RAPIDAMENTE" tram 215 

173 PRINT" {SU} QUANTE PIU* NE VERRAN-NO DI 
STRUTTE" tram 211 

175 PRINT" {GIU* ){YEL> BASI E BOMBE EXTRA P 
ERCH1 RAGGIUNGE 60 PUNTI" tram 180 

180 PRINT" {BLU} {GIU* } { 4 SPAZI } {RVS } BUONA 


190 

FORTUNA " t GOSUB 1 9 0 t RETURN 
AS*" {RVS}" 

: rem 

: rem 

174 

146 

195 

FORL-ITOIOOO 

; rem 

164 

200 

PRINT* {HOME}" 

: rem 

118 

205 

PRINTTAB(2)A$;"{CYN}{ 17 GIU’} 

{ 2 SIN) RETURN PER CONTINUARE" 

: rem 

27 


210 GBTRS : IPR$“CHR$ (13) THENRBTURN 

t rem 42 

215 FORI +1T03 33 t NEXT tram 235 

220 IFA8"" { RVS } "THENAS-" {OFF ) " t GOTO230 

tram 202 

225 IFA$+" (OFF) "THENAS"* {RVS}" tGOTO230 

tram 207 

230 NEXTL tram 32 

235 A$-"{R£D)++* + * *{ 3 SPAZI}*** * 

{ 2 SPAZI }*" t X*LEN (A$> tZ$«" {GIU* }":GO 
SUB295 trem 114 

240 A$-"*{ 3 SPAZI}* * *{ 3 SPAZI}* * ** 
*":X«LEN(AS) tZ$*"{ 2 GIU' } " : GOSUB29S 

tram 1$ 

245 A$-"*{ 4 SPAZI }«{ 2 SPAZI}" 

{ 3 SPAZI)* * * **"tX-LEN(A«) tZ$** 

{ 3 GIU' }"tGOSUB295 tram 251 

250 A8»"***{ 2 SPAZI } * { 2 SPAZI}*** *** * 
{ 2 SPAZI }*"tX«LEN(A$) :Z$-"{ 4 GIU') 

" i GOSUB295 tram 176 

255 A$*"{YBL){ 2 SPAZI)*** *** *** 

{ 2 SPAZI}* *{ 3 SPAZI }" tX-LEN <A8) tZ$ 
«"( 7 GIU ’ }" iGOSUB295 tram 92 

260 A$-"{ 4 SPAZI)* * + * *{ 2 SPfcZI}* + 

{ 3 SPAZI )" t X+LEN (A$) tZ$-"{ 8 GIU')"t 
GOSUB29S tram 35 

265 A$*"{ 3 SPAZI ) * { 2 SPAZI}*** *** 

{ 2 SPAZI}* *{ 3 SPAZI )"tX-LEN(A$) t Z$ 
-"( 9 GIU ' } " : GOSUB295 tram 141 

270 AS*" { 2 SPAZI }•{ 3 SPAZI)* * * 

{ 10 SPAZI }" tX-LEN ( A$) tZS*" 

{ 10 GIU' }"tGOSUB295 tram 200 

275 A8-"{ 2 SPAZI}*** * * *{ 4 SPAZI}* + 

( 3 SPAZI}" tX-LEN(AS) :Z$-"{ 11 GIU’} 
":GOSUB295 tram 134 

280 PRINT t PRINT trem 238 

290 GOTO 40 tram 56 

295 POKE36878, 15 tram 113 

300 FORI * lTOLEN ( A$ ) tram 105 

305 PRINT" {HOME} {GIU' }"Z$ ;SPC (X) LEFTS (AS , 
I) tPOKE36876,25S-(I*7) tram 182 

310 X-X- 1 t NEXT tPOKE3 68 7 6,0: RETURN 

tram 69 

400 FORA-4700T05000 trem 44 

420 READD trem 246 

430 POK£A,D trem 119 

440 NEXT tram 215 

450 RETURN tram 121 

500 DATA169, 8, 141, 15, 144, 169, 147, 32, 210, 2 

55.162.8.160.8.32.240.255.169.18.32.2 

10.255.169 tram 40 

501 DATA169, 32, 210, 255,169,127,32,210,255 

,169,146,32,210,255,169,32,32,210,255 
,169,18,32 tram 36 

502 DATA210, 255, 169,169,32, 210,255, 169, 12 
7,32,210,255,24,162,9,160,7,32,240,25 

5.169.169 tram 251 

503 DATA32, 210, 255, 169, 160, 162, 5, 32, 210, 2 

55,202,224,0,208,248,169,127,32,210,2 
SS 24 s r 23 

504 DATA162, 10, 160,7,32,240, 255,169,146, 3 

2.210.255.169.127.32.210.255.169.18.3 

2.210.255 : rem 212 

505 DATAX69. 160, 162, 5,32, 210, 255, 202, 224, 
0, 208, 248, 169, 146, 32, 210 ,255, 169, 169, 

32.210 . 255 ; rem 32 

506 DATA24, 162, 11, 160, 7, 32, 240, 255, 169, 32 

,32,210,255,169,18,32,210,255,169,160 
,162,5,32 :rem 227 

507 DATA210, 255, 202,224,0,208, 246, 169, 146 

,32,210,255,169,32,32,210,255,24,162, 
11,160,7 : rem 172 


52 SUPCNVtO» 3*4 


50B DATA32, 240, 255, 169, 16,32, 210, 255, 24,1 

62.12.160.7.32.240.255.169.169.32.210 
,255,169 :r#m 194 

509 DATA160, 162, 5,32,210,255,202,224,0,20 

8, 24B, 169, 127, 32, 210, 255, 24, 162, 13, 16 
0,7,32,240 : rem 7 

510 DATA255, 169, 146, 32, 210, 255, 169, 127, 32 
,210,255,169,18,32,210,255,169,160,16 

2. 5.32.210 :rem 31 

511 DATA255, 202, 224, 0,208, 248, 169, 146, 32, 

210,255,169,169,32,210,255,24,169,146 
,32,210 : re» 141 

512 OATA255.24, 162,14,160,8, 32,240, 255,16 

9,127,32,210,255,169,169,32,210,255,1 
69,32,32 irei» 192 

513 DATA210, 255, 169, 127, 32, 210, 255, 169, 16 

9,32,210,255,24,96 :rem 149 



205 IFPEEK (N2-22) “102THENGOSUB585 

irei» 206 

210 IFS3“QANDPEEK (N3+1) <>102THENN3“N3+Y: P 
OKEN3+C, 5: POKEN3 , 39 : POKEN3-Y, 32 

irei» 118 

21S IFPEEK ( H3+l) “1 02THENGOSUB585 i rem 155 
220 IFS4-0ANDPKBK(N4-1) O102THENN4-H4-Y! P 
OKEN4 +C , 6 i POKEN 4 , 3 8 i POKEN 4 +Y , 32 


Cylon Zap versione per VIC 20 
Programma 3 


35 DEFFNA(A) «INT(RND<1> *X+A) iTT-4348 

irei» 93 

40 V3-36876;Nl«4106iN2“4590:N3-4338iN4-43 


59: VI “36876 

a rem 

102 

4 5 CS “36879 : S0»368 78 i 03379 2 ;V4“ 36877 

affi- 

30:W2“20:W3“10ìW4“5:W5“l 

: rem 

186 

50 A1$-"D,.":A2$“"U..":A3$-"D. 

.*;A4$- 

"C.. 

" i A55“"0. »* 

: rem 

5 

55 POKECS, 6 : PRINT" {CLR} " : G0T0655: rem 

68 

60 BASE“3 :S1“1 :S2“1 :S3“1:S4“1: 

BOM“3i5C“0 


: rem 

106 

65 POKE36869, 205;X“15; Y“1 : I“22 

a rem 

199 

70 PRINT" {CLRj{WHT}"i POKECS, 8 

: rem 

51 

75 DD« 37154 : PI ■ 37151 1P2-37152 

arem 

41 

80 GOSUB240 

t rem 

126 

90 PRINT* {HOME) (CYN } a ; < m SCa PRINT" { HOME } 

{GIU 1 } “ > ? " BA : PRINT" [£] "BOM 

: rem 

156 

95 POKEDD,127:P-PEEK(P2) AND128 

; rem 

24 

100 J0-- <P-0> 

a rem 

131 

105 POKEDD r 2 5 5 a P - P EEK ( Pi) 

arem 

211 

110 Jl*-( (PAND8J-0) : J2"- ( (PAND16) *0} a. 

J3=- 

{ (PANO 4] -0) : FB"- ( (PAND32) » 

0) ;G"42 



a rem 

. B 

1X5 POKETT, 102 

: rem 

45 

120 POKBTT+C , INT ( RND ( 1) * 7 +1 } 

: rem 

99 

125 IFJ3THEN320 

; rem 

104 

130 IFJ1THEN345 

a rem 

105 

135 IFJ2THEN370 

a rem 

109 

140 IFJ0THEN395 

: rem 

110 

145 IFFBANDBOH>0THEN855 

: rem 

161 

150 A1*FNA(1) 

a rem 

156 

155 A2 *FNA { 2 ) 

: rem 

163 

160 A3=FNA { 3) 

a rem 

161 

165 A4*FNA{4) 

a rem 

168 


170 IFAl«lANDSl<>0THENSl«0;GOSUB900 

: r erti 123 

175 IFA2=2ANDS2<>0THBNS2*0:GOSUB900 

: rem 132 

180 IFA3*3ANDS 30 QTHENS 3»Q : GOSUB9QO 

: rem 132 


arem 128 

225 IFPEEK (N4-1) -102THEHGOSUB585 : rem 159 
230 IFBASE-OTHBNGOT062O areni 172 

233 IFSO50THENX-4 arem 88 

235 GOTO 90 arem 60 

240 PRINT" {REO} ■ : SYS 4 7 00 a rem 135 

295 POKE4282+C, 7 a PÒKB4282, 33tPOKE4414+C,7 
; POKB4 4 14 , 36 : POKE434 5+C , 7 a POKE4 34 5 , 34 

arem 227 

300 POKE4351+C, 7: POKE 4 3 51, 35 arem 42 

310 POKETT- 1, 102 : POKETT+ 1 p 102 ; POKETT- 22,1 

0 2 ; POKETT+ 2 2 , 102 arem 116 

315 RETUR» : rem 121 

320 POKEV4 , 245 a POKESO, 15 arem 147 

325 FORP*42 62T04 106STEP- 22 arem 15 

330 IFPEEK ( F- 2 2 ) < > 4 QTHENPOKEF+C f 7 : POKER , 4 

1 a FORT- ITO 5 : NEXT : POKEF , 32 : NEXT 

arem 242 

335 1 FPEEK (F- 22) - 40THENPOKEN1+C , 2 : POKEN 1 , 
42:GOSUB480:FOKENl,32:ttl«410€aSl-l 

arem 247 

340 POKEV4 , 0 : POKE 4 2 82, 3 3 a GOTO 1 50 a rem 128 
345 P0KEV4, 245; POKESO, 15 arem 1S4 

350 POUF- 4 4 1 4T04 60 2STEP2 2 arem 222 

355 I FPEEK (F+22 ) 03 7THENPQKBF+C r 7 i POKEF, 4 
1; FORT* ITO 5 : MEXT: POKEF , 32 a NEXT 

arem 253 

360 IFPEEK (F+22) ■ 3 7THEN : POKE» 2 +C , 2 : POKE» 2 
, 4 2 :GOSUB4 80 : POKEN2 , 32 : N2* 4590 : S2"l 

a rem 63 

365 POKEV4 ,0 :PGKE4414, 36aGOTO150 a rem 135 
370 POKESO, 15: FOKBV4, 245 arem 152 

37$ F0RF-4345T0433BSTEP-1 Srem 232 

380 IFPEEK (F-1K>39THENP0KEF+C,7: POKEF, 43 
: FORT" ITO 5 a NEXT : POKEF , 32 ; NEXT 

arem 206 

385 IFPEEK (F-l) "39TNENPOKEN3+C , 2:PQKEN3, 4 

2 a GOSUB480 a POKEN 3 , 32:N3= f 4338;S3"l 

arem 226 

390 POKEV4 , 0 ; P0KE4 345 r 34 aGOTGlSO : rem 134 
395 POKESO, 15SPOKEV4, 245 arem 159 

400 FORF-4351TO4359 arem 67 

405 IFPEEK ( F+l) <>38THE»FQKBF+C, 7 : POKEF , 43 
: FORT" ITO 5 : NEXT : POKEF ,32: NEXT 


185 IFÀ4"4ANOS4<>OTHENS 4 = 0 a GOSUB9 00 

arem 141 

190 IFS1-0ANDPREK (Nl+22) Ol02THRNNl*Nl+I: 
P0KEN1+C , 4 : POKENl , 40 : POKENl- I , 32 

arem 121 

195 IFPEEK (Hl+22) -102THEMGOSCJBS85 

arem 211 

200 I FS 2 = 0 AND PEE K (112-22} <> 1 0 2TH ÉNN 2 » N 2 - 1 a 
PGKEN2+C, 3 ; POKEN 2 , 37 : POKEN2 + 1 , 32 

arem 127 


410 


415 

420 

425 

430 

435 

440 


arem 201 

IFPEEK { F+11 -38THBNPOKEN44C , 2 : POKEN 4 , 4 
2 : GOSUB4 80 : POKEN 4 , 32 : Ni-4359 : S4-1 


: rem 

POKEV4 , 0 a POKE4351, 35 aGOTOlSO : rem 


POKESO , 15 : RESTO RE ; rem 

READP arem 

IFP"- 1THEN4 6 5 arem 

RE ADO arem 

POKEV3 f P a POKEV1 , P arem 


220 

130 

56 

7 

223 

252 

56 


SUPtRVK* m* 53 


445 

FORN-lTODsNEXT 

srem 

160 

450 

POKEV 3 , 0 : POKEV 1 , 0 

: rem 

249 

455 

FORN-1TO20 : NEXT 

Srem 

191 

460 

GOTO425 

: rem 

110 

465 

RETURN 

: rem 

127 

470 

DATA217, 200,213,200, 

223,200,227,: 

100,2 


34,100,230, 200 :rem 147 

475 DATA227, 100, 234,100, 230 r 200, 223, 200, 2 
27, 200, 217, 200, 213, 300 ,~1 srem 168 

480 PO RESO, 15 : rem 224 

485 POKEV4 , 200 srem 24 

490 FORL-1 5TOOSTEP- 1 ; rera 224 

495 POKESO , L srem 204 

500 NEXT: POKEV4, 0 srem 35 

505 SC-SC+1 treni 95 

510 IFSC-30THENX-INTCX/2) ;Y-2 srera 22 

515 rFSC-50THENX«4;I*44:BOM-BOM+I 

; rem 17 

520 IFSC-60ORSC - 1 1 0QRSC- 1 5QTHENGOTO 530 


600 POKESO , Z : GOSUB690 : NEXT: POKECS , 8 : POKEV 
4,0 srem 82 

605 Nl-4106:3l-l:N2-459Q:S2»l;N3*4338:S3- 
1 :N4-4359:S4-1 SPRINT" {CLR}" :rem 215 
610 BASE-BASE- 1 : IFBASEOQTHENGOSUB240 

srem 59 

615 RETURN iretn 124 

620 POKE36869, 192 SPRINT" [CLR}" srem 61 
625 rFSC“>WlTHEHA5$ »A4$ : A4$«A3$ : A30-A2? 

srem 176 

630 IFSC»>W1THENA2$«A1$ :W5*W4 : W4-W3 ;W3«W2 
: W2-W1 s Wl -SC : GOT09 0 5 ;rem 44 

635 IFSC->W2ANDSC<WlTHENA5$«A4$:A4$-A3$sA 
3$-A2$:W5-W4:W4«w3:tf3-W2:W2-SC:G0T091 
, 0 srem 40 

640 IFSC- >W3 ANDSC< W2THENA 5 $ * A4 $ : A4$«A3$ :W 
5 -W4 : W4 *W3 s W3-SC t GOT091S srem 252 
645 IFSC->W4ANDSC<W3THENA5$-A4$ ;W5=W4 :W4- 
SC s GOTO 920 srem 204 

650 IFSC->W5ANDSC<W4tHENW5«SC:GOT0925 

:rem 152 

655 GOSUB820; PRINT" {HOME} {YEL} 

{ 21 GIU 1 } PER GIOCARE PREMI {RVS} 

{ C YN } S " srem 61 

660 GETZ$ : I F 2 $ » " " THBNFORCC - 3 7 90 4TO 3 7 9 0 7 : P 
OKECC, IMT(RND Cl) *7+1) tNEXT s rem 66 
665 POKE383 69 , INT ( RND ( 1) *7+1). ; rem 104 

670 IFZ$-" "THEN66Q * ; rem 246 

675 IFZ$«"5"TH£N60 : rem 24 

680 IFZ0 -"N"THENPRINT* {CLR} [ BLU }": POKECS , 
27: END srem 209 


685 G0TO655 : rem 124 

690 K»K+l:M«23:N-22:0-21:R*INT(RNB (1) *7+1 
) : 1FK> 3ANDKK< 110THENPOKECS , KKi KK-KK+1 
7 :rem 25 

6 9 5 POKEQ 1 , G : PO KEQ 2 , G : POKEQ 3 , G : POKEQ 4 , G S P 
OKEQ 5 , G : POKE06 , G : POKEQ7 , G s POKEQ 8 , G 

: rem 118 

700 POKEQ1+C, R : POKEQ2+C, INT (RND (1) *7+1) :P 
QKEQ3+C,R: POKEQ 4 +C, INT (END (1) *7+1) 

:rem 217 

705 POKEQ 5+C , R: POKEQ6+C , INT (RND ( 1) *7+1) :P 
OKEQ7+C , R: PO KEQ 8 +C , INT ( RND < 1) *7+1) 

srem 238 

710 FORT» ITO 10 :NEXT : rem 190 

715 IFK>3THENG»46 SPRINT" {CLR} " : rem 163 

720 IFK<8THENQ1*Q1-0:Q2»Q2-M;Q3*Q3+0:Q4»Q 
4+M:G5=Q5-N:Q6-Q6+N: Q7«Q7-1:QB=Q8+1 :R 
ETURN : rem 156 

725 PRINT" {CLR} " : RETURN :rem 28 




: rem 

111 

730 

PRINT" { 3 GIU 1 }" sCH-4171 :E-1 

s rem 

90 

525 

RETURN 

s rem 

124 

735 

POKEDD ,127: P- PEE K ( P 2 ) AND 126 

: rem 

73 

530 

PRINT" {CLR}{ 10 GIU" li 

9 SPAZI} BONUS" 

740 

J0-- (P-0) 

s rem 

141 



: rem 

45 

745 

POKEDD, 255 sP-PEEK (PI) 

: rem 

221 

535 

PRINT" { 6 SPAZI} BASI - 

BOMBE" 


750 

J2«- ( (PAND16) -0) 

: rem 

27 



srem 

31 

755 

FB«- ( (PANO 32) -0) 

: rem 

42 

540 

POKEV4 , 0 ; POKE36878 , 15 : 

L-0 srem 

172 

760 

IFJ0THENE-E+1 

srem 

248 

545 

FORT- ITO 10 

s rem 

75 

765 

IFJ2THENE-E-1 

srem 

1 

550 

POKE 36876,220 

: rem 

151 

770 

IFE-0THENE-26 

: rem 

248 

555 

NEXT 

: rem 

222 

775 

IFE- 27THENE- 1 

srem 

255 

560 

FORT- ITOIQ 

: rem 

72 

780 

POKECH , E S POKECH+C , 7 

srem 

143 

565 

POKE36876, 230 

: rem 

158 

785 

FORT- ITO 1 0 0 : NEXT 

: rem 

250 

570 

NEXT 

: rem 

219 

790 

POKECH+C, 6 

srem 

42 

575 

I FL< 6THENL- L+l S GOTO 5 4 5 

: rem 

95 

795 

IPPBANDCH-417lVHENNl$-CHRS (E+64) : 

CH-C 

580 

BOM-BOM+1 : BASE-BASE+1 S 

SC-SC+5 : POKE 368 


H+ 1 S E* 1 : GOTO 735 

srem 

71 


76,0: POKE 3 6678,0: PR1 NT 

" {CLR) " : GOSUB24 

800 

I FF BANDCH = 417 2THENN 2 $ =CHR$ (E+64) : 

CH-C 


OtGOTOBlO 

: rem 

157 


H+1:E-1 SG0T0735 

srem 

60 

585 

POKESO , 15 : Ql-434 9 :Q2=434 9 : Q3-4370 

:Q4- 

805 

I FFBANDCH- 417 3THEKN 3 $ -CHRS (E+64) : 

CH-C 


4371 : K-0sQ5-Ql-23:Q6-Q3+23 SQ7-Q1+21 ;Q 


H+l:E»32:GOT0735 

: rem 

119 


8-4372 

: rem 

8 

810 

IFCH»4174THENN5$«Nl$+N2$+N3$ 

: RETURN 

590 

POKEV4, 200: KK-8 

srem 

90 



: rem 

47 

595 

FORZ-15TOOSTBP-2 

srem 

245 

815 

GOTO735 

srem 

118 


820 PRINT" {CLR} {BLU} { 2 SPAZIÌEROI DI CYL 
ON ZAP" SPRINT: PRINT" {RED} I MIGLIORI 5 
PUNTEGGI {OFF } " s rem 6 

825 PRINT" {HOME} {GIU 1 } {CYN } { 4 GIU'} 


{ 6 SPAZI } "Al$ * # • * "Wl 


99 


830 PRINT" {PUR} { 2 GIU 1 }{ 6 SFAZ I } ”A2 $ " . ■ 


,f W2 


: rem 


24 


835 PRINT" {PUR} { 2 Gltl'H 6 SPAZI }"A3$%. 


. "W3 


31 


840 PRINT" {PUR}{ 2 GIU 1 H 6 SPAZI }"A4$" , . 


* "W4 


;rem 


29 


845 PRINT" { PUR H 2 GIU'}{ 6 SPAZI }"AS$" » . 

. "W5 srem 36 

650 RETURN : rem 125 

855 POKESO, 15: PO KEV4, 220 : rem 153 

860 FORCO- 127TOBSTEP- 17 : rem 154 

865 POKECS , CO : POKESO , CO/8 - 1 srem 149 

870 FORT- iTOlQOt NEXT sNEXTCO : rem 0 

875 I FS 1 -0THENSC- SC+1 : GOSUB 5 10 : POKENl , 32 : 

NI -410 6:51-1 srem 206 

800 IFS 2-0THENSC-SC+1 SGOSUB510 ; POKEN2 , 32 : 

N2-4 590:52-1 srem 213 

885 IFS3-0THENSC-5C+1:GOSUB51O:P0KEN3,32; 

N3-4338 :S3-1 srem 222 

890 IFS4-OTHENSC-SC+1:GOSUB510 : POKEN4, 32; 

N4-4359 : S4-1 srem 225 

895 POKEV4,OsBOM-BOM-I: GOTO 150 srem 85 

900 POKESO, 15 :FORM-180TO235STEP2:POK£V3,M 
: NEXT : POKEV3 , 0 : POKESO , 0 : RETURN 

srem 96 

905 PRINT" {HOME} #1 INTRODUCI LE TUE 
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( 3 SPAZI) 1N1ZIALI*:GQSUB420:GOSUB730 
:A1$-N5$:G0T0655 irem 102 

910 PRINT" {HOME) 12 INTRODUCI LE TUE 

{ 3 SPAZI) INIZIALI" SGOSUB4205GOSUB7 30 
:A2$-N5$:G0T0655 srem 200 

915 PRINT" { HOME ) #3 INTRODUCI LE TUE 

{ 3 SPAZI) INIZIALI" :GOSUB420;GOSUB730 
:A3$-N5$ :G0T0655 :rem 207 

920 PRINT" (HOME) 94 INTRODUCI LE TUE 

{ 3 SPAZI) INIZIALI" :GOSUB420:GOSUB730 
: A45-N55 :G0T0655 :rem 205 

925 PRINT" {HOME) 95 INTRODUCI LE TUE 

{ 3 SPAZI } INIZIALI" :GOSUB420 :GOSUB730 
: A5S»N5S : GOTOS55 iren 212 


Cylon Zap versione per C64 


100 POKE52, 4 9 : POKE56 , 4 8 SCLR :tem 70 

125 DATA2t,149, 100,25,30, 100, 33,135,100,3 
7,162,50,50,60,50 srem 54 

130 DATA42, 62, 100, 37, 162, 50, 50, 60, 50, 42, 6 
2,100,33,135,100 :rem 252 

140 DATA28, 49,100,25,30,100 : rem 78 

145 F0RX"1T036 ! READHT:NEXT : rem 200 

150 PF I NT " [ CLR ) " : POKE S 3 2 8 1 , 0 : POKE 53290,0: 

PRINTCHRS (14) srem 7 

160 GOSUBS90 : rem 181 

170 PRINT" { 3 GIU'H 10 SPAZI ) { RVSlCARIC 
AMENTO {SPAZI )CARA{ 2 T)ERI":rei T9 
180 POXE56334 , (PEEK( 5^334) ANÒI54) : POKEl.P 
EEK (1) AND251 : rem 11 

190 FORA«0TO2047: POKE | A+122B8) ,PEEK(A+532 



48} :NEXT 

: rem 

87 

200 

FORA™ 125 5 2TO 1 2672 

: rem 

155 

210 

READD 

: rem 

243 

220 

IFD< > - 1THENPOKEA , D : NEXT 

:rem 

199 

230 

FORA- 1 228 STOl 43 35: READD : IFDO-lTHENPO 


KEA, PEEK (A) :NEXT 

: rem 

28 

240 

FORA-12504TO12527 : READD: PO KEA, D: NEXT 



: rem 

200 

250 

POKEl ,55 

:rem 

141 

260 

POKE56334 , PEEK ( 56334} ORI 

;rem 

69 

270 

GOSUB750 : PRINT" {SU) { 9 SPAZ I } ISTRUZ I 


QNI {OFF } {RVS } S {OFF } O {RVS }N {OFF} 



(Il SPAZI}" 

: rem 

59 

280 

GETAS : I F AS - " " THENPOKE5 6076 

, I NT ( RND (1) 


*7+1} : POKE 56 0 8 0 , 1 NT 1 RND f 1 ) 

*7+1) : GOTO 2 


80 

: rem 

131 

290 

I FA$ » " S " THENPOKE 5 3272, (PEEK ( 53272) AND 


240 } +1 2 : GOSUB38 0 

: rem 

6 

300 

GOTO 1000 

: rem 

141 

310 

DATA24, 24, 60,126,24,24,126 

,255,1,19,5 


1,255,255,51,19,1,128,200, 

204,255, 

255 



: rem 

31 

315 

DATA20 4 , 200 

: rem 

7 

320 

DATA12B, 255, 126,24,24,126, 

60,24,24 

, 24 


,24,60,24,60,126,219,195,3,7,44,254 

:rem 19? 


325 DATA 2 54,44,7, 3,192,224, 52, 127,127, 52, 
224 ,192, 195, 219, 126, 60, 24,60,24, 24 

srem 161 

330 DATA16, 8, 16, 8, 16, 8, 16, 8, 145, 74, 4 4, 113 
,142,52,82,137,0,0,0,170,85,0,0,0,-1 

:rem 212 

350 DATÀG, 0,0, 119, 68, 116, 20, 119, 0,0, 0,119 
,85, 87, 06, 117, 0,0*0,112, 64, 9 6, 64, 112 

;rem 221 

360 DATAO, 0,0, 206, 170, 206, 170, 202, 0,0, 0,2 
38,136,236,40,238,0,0,0,224,128,224 

:rem 145 



365 DATA32, 224,-1, 0,0,0 :rera 127 

370 DATA206,170, 202, 170,206,0,0,0, 139,218 
,171,138,139,0,0,0,56,160,56,136,56 

:rem 180 

380 PRINT" tCLRH RED } BENVENUTI A CYLON ZAP 

" : r ero 124 

390 PRl NT" AVETE UNA BASE CHIAMATA ALPHA": 

PRINT :reo 70 

400 PRINT" {CYN}LA VOSTRA MISSIONE CONSIST 
E NEL PROTEO- CERE UN { 2 SPAZI} RE ATTO 
RE NUCLEARE" ; : rem 210 

410 PRINT" DALLE {PUR} ASTRO- NAVI KAMIKAZ 
E" : rem 149 

420 PRINT" {GIU 1 } {CRN} AVETE A DISPOSIZIONE 
4 LASER CONTROLLATI DAL JOYSTICK" 

: rem 35 

430 PRINT" {BLU} AVETE ANCHE BOMBE F INNESC 
ATE DAL PUL-E 2 SPAZI }SANTE DI SPARO" 

:rem 28 

440 PRINT" {GIU* } fYEL} DOVETE SOLO PUNTARE 
IL CANNONE E IL LA- SER SPARA AUTOM AT 
ICAMENTE" : rem 40 

4S0 G0SUB5OO : rem 174 

460 PRINT" {CLR} {PUR} {GIU* } LE ASTRONAVI VO 
LERANNO TANTO PIU RAPIDA-" : rem 249 

465 PRINT" {SU}MENTE QUANTE PIU NE DISTRUG 
GERETE" : r em 167 

470 PRINT" (GIU* } { YELjBASI E BOMBE EXTRA P 
ER CHI RAGGIUNGE. 60 PUNTI" : rem 178 

480 PRINT" {BLU} {GIU* }{ 7 SPAZ I J{ RVS } BUONA 
FORTUNA (OFF } * : GOSUB500 : RETURN 




: rem 

62 

490 

G0T065535 

: rem 

222 

500 

A$-" {RVS}" 

:rem 

141 

510 

FORL* ITO 1000 

: rem 

155 

520 

PRINT" {HOME} " 

: rem 

123 

530 

PRINTTAB { 2 } A$ ; " (CYN } { 20 

GIU 1 } PREMI R 


ETURN PER CONTINUARE" 

: rem 

14 6 

540 

GBTR$ : IFR$«CHR$ ( 13) THENRETURN 

: rem 

4@ 

550 

FORI -1T0333: NEXT 

: rem 

237 

560 

I FA$ * " { RVS } "THENA$ « " { OFF } 

" ; GOTO 580 
: rem 

217 

570 

I F A$ * " { OFF } " THENA$ - ** { RVS ) 

" : G0TO580 
: rem 

218 

580 

NEXTL 

:rem 

40 


590 A$ » " { RED } * * * *{ J SPAZI}* * 

{ 4 SPAZI}*** f 2 SPAZI}* { 2 SPAZI}*": 
X-LEN(A$3 : {GIU 1 }":GOSUB7lQ 

:rem 110 
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600 A$-"*E 4 SPAZI}* *{ 2 SPAZI)* 

( 4 SPAZI}* *{ 2 SPAZI}** *":X»LEN(A$ 
);Z$«"( 2 GIU' }"iGOSUB710 :cem 7 

610 A$-"*{ 5 SPAZI } * { 3 SPAZI}* 

{ 4 SPAZI}* *{ 2 SPAZI}* **"; X“LEN ( A$ 
):Z$-"t 3 GIU' }":GOSUB710 :rem 239 

611 A$«"*{ S SPAZI}* { 3 SPAZI}* 

{ 4 SPAZI}* *{ 2 SPAZI}*{ 2 SPAZI}*"! 
X=tEN(A$) :Z$-"{ 4 GIU ' } " : GOSUB710 

: rem 215 

620 A$-"***{ 3 SPAZI}*! 3 SPAZI}*** 

t 2 SPAZI}***! 2 SPAZI}*! 2 SPAZI}*": 
X-LEN[A$) :Z$«"{ 5 GIU'}"jGOSUB710 

: rem 166 

630 A$-"!1TEL}( 3 SPAZI}***! 2 SPAZI}*** 

( 2 SPAZI}***! 2 SPAZI}* *! 2 SPAZI) 

" : X=LEN (A$ ) : Z$ = " { 8 GIU 1 }" :GOSUB710 
1 : rem 93 

640 A$="{ 5 SPAZI}*! 2 SPAZI}* * 

{ 2 SPAZI)* *{ 2 SPAZI}* *{ 3 SPAZI} 
*;X-LEN(A$) ! Z$“"{ 9 GIU’ }"sGOSUB710 

: rem 46 

650 A$-"{ 4 SPAZI}*! 3 SPAZI}*** 

t 2 SPAZI}***! 2 SPAZI}* *{ 3 SPAZI} 
*:X-LBN(A$) iZS»"{ 10 GIU 1 } " ì GOSUB710 

: rem 148 

660 A$*"t 3 SPAZI)*! 4 SPAZI}* * 

{ 2 SPAZI}*! IO SPAZI}"! X-LEN(AS) ! Z$- 
"! 11 GIU' }":GOSUB710 : rem 212 

670 AS“" t 3 SPAZI}***! 2 SPAZI}* * 

! 2 SPAZI}*! 4 SPAZI}* *{ 3 SPAZI} ";X 
=LEN (A$) ! ZS“" ! 12 GIU' }"sGOSUB710 

:rem 142 

680 PRIHTìPRIHT : rem 242 

700 GOTO170 :rem 104 

710 S-54272 : rem 44 

711 POKE54296, 15 : POKE54277 « 18: POKE54278 , 2 

40 :rem 160 

712 POKE54 276 , 33 : rem 99 

720 FORI ■ ITOLE N ( AS ) : PQKE 54273,1 + 40 

:rem 225 

721 PRIHT"{HOME} EGIU' }( 6 DES} "Z$ ;SPC (X) L 
EFT$ (A$,I) :POKE54272, (1*2) +180 

; rem 140 

730 X“X-1;NEXT:FORG=15TOOSTEP-1 ! POKE54296 



, G : NEXT ; POKES+ 4 ,16 

sretn 

227 

735 

FORE* STOS+2 8 : POXEE , 

0; NEXT: RETURN 
: rem 

131 

750 

FORA-49152T049453 

;rem 

178 

760 

READD 

: rem 

253 

770 

POKEA, D 

: rem 

126 

780 

NEXT 

;rem 

222 

790 

RETURN 

: rem 

128 


BOO DATA169, 12,141,33, 208,169,147,32,210, 

255. 162. 8. 160. 16. 32. 240. 255., 169, 1B, 32 

: rem 51 

610 DATA210, 255,169 : rem 218 

820 DATA169, 32,210,255, 169,127,32, 210,255 

,169,146,32,210,255,169,32,32,210 

: rem 110 

825 DATA 2 55, 169,18,32 :rem 71 

830 DATA210, 255, 169, 169, 32, 210, 255, 169, 12 

7,32,210,255,24,162,9,160,15,32 

:rem 12 

835 DATA240, 255, 169,169 : rem 176 

840 DATA32, 210, 255,169, 160,162, 5,32, 210,2 

55.202. 224.0. 208.24B, 169, 127 :rem 113 

845 DATA32, 210,255,24 :rem 57 

850 DATA162, 10, 160,15, 32,240, 255,169,146, 

32,210,255,169,127,32,210,255 

:rem 162 


855 OATA169, 18, 32,210,255 :rem 9 

860 DATA169, 160, 162,5,32,210,255,202,224, 
0,208,248,169,146, 32,210, 255: rem 116 
865 DATAI 6 9 ,169,32,210,255 ; rem 65 

870 DATA24, 162, 11, 160, 15, 32,240,255,169,3 
2,32,210,255,169,18,32,210 :rem 8 
875 DATA255,169, 160, 162,5,32 :rem 160 
880 DATA210, 255,202, 224,0,208,248, 169, 146 
,32,210,255,169,32,32,210,255,24 

itero 55 

885 DATA24 ,162,11, 160, 7 treni 158 

890 DATA32,240,255,169,18, 32,210, 255,24,1 
62,12,160,15,32,240,255,169,169 

treni 17 

895 DATA32 , 210,255,169 :rem 120 

900 DATA160, 162, 5, 32, 210, 255, 202, 224, 0,20 

8. 246. 169.127. 32.210. 255.24 :rem 52 
905 DATA162,13, 160, 15,32,240 :rem 137 
910 DATA255,169, 146,32, 210,255, 169, 127, 32 

, 210, 255, 169, 18, 32,ì 10, 255 :rem 30 
915 DATA169,160, 162, 5, 32,210 :rem 146 
920 DATA255, 202 , 224,0,208,248,169,146,32, 

210.255.169.169.32.210.255.24 

:rem 174 

925 DATA169, 146,32,210 :rem 113 

930 DATA255, 24, 162, 14, 160,16, 32,240, 255,1 
69,127, 32,210, 255, 169,169, 32: rem 126 
935 DATA210 , 255,169 ,32,32 ;rem 4 

940 DATA210,255,169,127, 32,210,255, 169, 16 


9,32,210,255,24,96 

; rem 

153 

1000 

RBSTOREiCLR 

; rem 

0 

1060 

DEFFNA (A) "INTERNO (1) *X+A) 

TT-1482 




; rem 

184 

1070 

POKE53272 , (PEEK (53272) AND240) +12 




:rem 

231 

1080 

Nl=1042:N2-I922iN3=1464:N4 

“1502 : Vl"3 


6876 

; rem 

165 

1090 

CS-53281:C-54272:W1«30:W2- 

20:W3=10;W 


4“5:W5«1 

; rem 

239 

1100 

A15*"D, .":A2S“"U.. M : A3$“"D 

*.":A4$ 

*"C 


. . " : A5$= n O. . " 

: rem 

98 

ilio 

POKECS , 1 : PRINT" {CLR} " : GOTO2190 




: rem 

194 

1120 

BASE-3:Sl*l:S2-l:S3=i:S4=l 

: BOM= 3 : 

se* 


0 

; rem 

202 

1130 

PQKECS,12:X-15:Y-1:I«40 

;rem 

115 

1140 

PRINT" {CLR} {WHT } " : POKECS , 8 

; rem 

146 

1150 

GOSUB1450 

: rem 

17 

1160 

PRINT" {HOME H WHT} PUNTI "SO: 

PRINT" 



{HOME} {GIU * ) BASI "BA: PRINT” 

{WHT} BOMBE 


" BO 

: rem 

174 

1170 

J 0 » 1 5 - (PEEK { 56321) AND15) 

: rem 

20 

1180 

G - 4 2 ; FB- ( PEEK (56321) AND 1 6 ) 

; r em 

181 

1190 

POKETT, 102 

;rem 

97 

1200 

POKETT+C, INT (RND (1) *7+1) 

: rem 

147 

1210 

I F J 0*1 THEN 1510 

: r em 

49 

1220 

IFJ0-2THEN157O 

: rem 

57 

1230 

IFJ0 -4THEN163G 

:rem 

57 

1240 

I F J 0-8 THEN 1690 

; rem 

68 

1250 

I FFB* Q ANDBOM> 0 THEN 2 590 

: rem 

106 

1260 

AÌ-FNA { 1) 

; rem 

207 

1270 

A2-FNA(2) 

: rem 

210 

1280 

A3 -FNA { 3 ) 

: rem 

213 

1290 

A4*FNA(4) 

: rem 

216 

1300 

IFA1=1ANDS1<>OTHENS1“0:GOSUB2680 




: rem 

222 

1310 

I FA 2 - 2 AND S 2 < >0 THENS 2 = 0: GOSUB2 6 80 




; rem 

227 

1320 

IPA3« 3ANDS 3< > 0THENS 3”0 ; GOSQB2680 




; rem 

232 


1330 IPA4*4ANDS4<>0THENS4=0:GOSUB2680 
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: rem 237 

1340 IFS1-QàNDPEEK(N 1 + 40K>102THENN1-N1-H 
! POKENl+C , 4 : POKENl , 40 : POKENl- 1 f 32 

: rem 167 

13 SO I FPEEK (Nl + 4 0 ) -1O2THENGOSUB20 SO 

treni 34 

1360 I FS 2 * 0 AND PEEK (H2-40]K> 1 0 2THENN 2 -N2 - 1 
; PQKEN2 +C , 3 : POKE N 2 ,37: POKEN 2 + 1,32 

:rem 183 

1370 IFPEBK(N2-40> «102THBNGQSUB2050 

: rem 39 

1300 IFS3-0ANDPEEK(N3 + 1K>1O2THENN3-N3+Y: 
POKEN3+C r 5 : POKEN3 , 39 ; POKEN3-Y , 32 

irem 175 

1390 IFPEEK(N3#l) -102THENGOSUB20S0 

: rem 245 

1400 IPS4 -0ANDPEEK {N4- 1) < > 102THENN4 -Ni -Y s 
POKEN 4+C , 6 : POKENl , 38 : POKEN4+Y , 32 

:rem 177 

1410 IFPEEK(N4-1)*102THEWGOSUB2050 

ire» 241 

1420 IFBASE-OTHENGOTQ2130 : rem 12 

1430 I FSC > 5 QTHBNX - 4 3 rem 136 

1440 GOTO 1160 : rem 202 

1450 PRINT" { RED } ” : SYS 491 52; POKECS , 11 

3 rem 130 

1460 POKEl362+C,l:POKEl362, 33 ! POKE1602+C, 
1 : POKE1602 , 36 : POKE1479+C , 1 : POKE1479 , 
34 3 rem 246 

1470 POKE1485+C, 1 : POKE1485, 35 : rem 103 

1 4 80 POKETT- 1,102: POKETT+1 ,102: PO KETT- 4 0 , 
102: POKBTT+ 40, 102 : rem 173 

1490 POKETT - 1+C , 1 ; POKETT+ 1 +C , 1 : POKETT- 40+ 
C , 1 s POKETT+40 +C , 1 ; rem 222 

1500 RETURN ; rem 166 

1510 POKE54296 , 15 : POKE54273 , 33 3 P0KE54272 , 
133 : POKE 54 2 77 , 50 : POKE5427B , 120 

;rem 247 

1520 POKE54276 , 129 s rem 199 

1530 FQRF-1362TQ1042STEP-40 : rem 54 

1540 r FPEEK (P- 40 ) O 40THENPOKEF+C , 1 : POKEF, 
4 1 : FORT- ITO 5 : NEXT : POKEF ,32: NEXT 

: rem 32 

1550 I F PEE K ( F- 4 0 > - 4 0THEN POKEN 1 +C , 2 : POKEN 1 
, 42 :GOSUB1830 : POKENl , 32 3 Ni -1042 :S 1-1 

: rem 83 

1560 POKE54296,0: PQKE1362 , 33 : GOTO 12 60 

treni 100 


1570 POKE54296,l53 POKE 54273 , 13 : POKE 54272, 
1 3 3 3 POKE 54277,50: POKE 54278,120 




: rem 

253 

1580 

PGKE54276 ,129 

: rem 

205 

1590 

FORF-1602TO1944STEP40 

: rem 

23 


1600 I FPEEK ( F+40 J < > 37THENPOKEF+C , 1 ; POKEF , 
4 1 : FORT- ITO 5 3 NEXT : POKEF , 3 2 : NE XT 

3 rem 33 

1610 I FPEEK { F+ 4 0 ì - 3 7THENPOKEN 2 +C , 2 : POKEN2 
, 42 :G05UBl830 : POKEN 2 , 32?N2-1922:S2-- 
39 :rem 200 

1620 POKE54 296 , 0 : POKE 160 2 , 36 3 GOTOl 260 

3 rem 97 

1630 POKE54296, 15 : POKE 5 4273, 33 : POKE 54 272 , 
133: POKE54277, 50 ; POKE5427B ,120 




: rem 

250 

1640 

POKE54276, 129 

: rem 

202 

1650 

F0RF-1479T01464STEP-1 

: rem 

23 


1660 I FPEEK (F - 1) <> 39THENP0KEF+C , 1 : POKEF , 4 
3 3 FORT- 1TO5 3 NEXT: POKEF, 32: NEXT 

: rem 250 

1670 IFPEEK(F-l) -39THENPOKEN3+C , 2 : POKEN3 , 
42 :G05UB183G : POKEN 3, 32 :N3 -1464:53*1 

s rem 61 



1680 POKE54296, 0: POKE1479 , 34 : GOTOl 260 

:rem 113 

1690 POKE 5 4296,15: POKE 5 4273,333 POKE 54 2 72, 
133: POKE 54277, 50: POKE54278, 120 

: rem 0 

1700 POKE54276, 129 : rem 199 

1710 FORF-HS5TO1502 : rem 112 

1720 I FPEEK (F+l) < >38THENPOKEF+C , 1 : POKEF , 4 
3 3 FORT- ITO 5 : NE XT : POKEF ,32: NEXT 

3 rem 244 

1730 I FPEEK { F+ 1 J -30THENPOKEN4 +0,2: POKENl , 
42 :GOSUB1830: POKEN 4 , 32 :N4-1 50 2:54-1 

:rem 53 

1740 POKE5 4 296,0: POKE 1485,35: GOTOl 260 

; rem 10B 

1745 FORS 0-542 7 2TO 5 4272+28: POKES 0,0: NEXT 

t rem 121 

1750 POKE54 296 , 15 : POKE54277 , 53 : POKE54278 , 
69 : PGKE54 276 , 33 :rem 175 

1770 RESTORE : FORGB » ITO 1 2 : RE AD HA , LA , DU : POK 
E54273 , HA: FOKE54272, LA :rem 183 

1780 FORT- 1TODU : NEXTT irem 130 

1790 NBXTGB : FORSO* 542 7 2TOS 4 2 7 2 + 2 B : POKES 0 , 
0 : NEXT : rem 123 

1800 RETURN :rem 169 

1810 DATA217,200, 213,200, 223,200, 227, 100, 
234,100,230,200 : rem 194 

1820 DATA227,100, 234, 100,230, 200,223,200, 
227,200, 217, 2 00, 213, 300, ~1 : rem 211 
1830 FORESI 2 96 ,15: POKE5427? , 53 : POKE54 2 78 , 



67 : POKE54276 ,129 

: rem 

226 

1840 

POKE54272 , 200 : POKE 54273 , 33 

:xem 

190 

1850 

FORL- 15TOOSTEP- 1 

: rem 

17 

1860 

POKE 54 296 , L 

: rem 

128 

1870 

NEXT: POKES4 276,0 

: rem 

220 

1880 

SC-SC+1 

: rem 

150 

1890 

IFSC-30THENX-INT (X/2) :Y-2 

: rem 

82 

1900 

IFSC- 50THENX-4 ; 1-80 : BOM-BOH+1 




i rem 

64 

1910 

IPSC-600RSC- 1 10ORSC- 150THENGOTO1930 



: rem 

216 

1920 

RETURN 

: rem 

172 

1930 

PRINT" {CLR} { 10 GlU'Jt 10 

SPAZI }BONU 


S"; 

; rem 

157 

1940 

PRINT" BASI - BOMBE" :L-0 

: rem 

67 

1950 

POKE54296, 15 : POKE54277 , 50 : 

POKE54278, 


167: POKE 54276, 17 

: rem 

223 

1960 

FORT- ITO 10 

: rem 

125 

1970 

POKE54272 , 230 : POKE54273, 33 

t rem 

197 

I960 

NEXT 

: rem 

17 

1990 

FORT- ITO 10 

; rem 

128 

2000 

POKE54272, 180 : POKE54273, 28 

: rem 

190 

2010 

NEXT 

s rem 

2 

2020 

IFL<6THENL-L+1: GOTOl 950 

: rem 

179 

2030 

FORO-54272TO54272+20 : POKED 

,0:NEXT 



: rem 

239 

2040 

BOM - BOM+ 1 : BA- BA+ 1 : SC-SC+5 : FR I NT ” 



(CLR } ” : GOSUB 1450: GOTO 1890 

3 rem 

94 


2050 POKE 54296, 14; Ql- 14 82 : Q2- 1 4 84 : Q3-1 522 
: 04-1524 ; K-0:Q5-Ql-41 ;Q6-Q3+41 :Q7»Q1 


yunsvK* m* 57 


+39 : rem 222 

2060 08-1526 SPOKE54277, 44 SPOKE54 278, 56: PO 
KE54 276 . 129 : rem 165 

2070 POKB54272, 200 : POKES4273 , 34 : KK-8 

: rem 0 

2080 FORZ-15TOOSTEP-2 : rem 28 

2090 POKE54296,Z:GOSUB2 260: NEXT: POKECS, 8 s 
POKE54 276 , 0 : rem 183 

2100 Nl-1042:Sl-l:N2«1922:S2-lsN3-1464:S3 
-1:N4-1502:S4=1:PRINT"{CLR}" 

srem 231 

2110 BASE-BASE- 1 S IFBASEOOTHENGOSUB14 50 

srem 156 

2120 RETUR)) srem 165 

2130 PRINT" {CLR ) " srem 42 

2140 IFSC>-W1THENA5$»A4$ sA4$-A3S s A3S-A2S 

srem 220 

2150 IFSC>-W1THENA2$-A1$:WS-W4:W4-W3:W3=W 
2 : W2«wl sWl-SC: GOTO2730 srem 137 

2160 IF$C>-W3ANDSC<W2THENA5$-A4$:A4$-A3$s 
W 5-W4 :W4=W3 : W3-SC :GOTO2750 srem 90 
2170 IPSC>-«4ANDSC<W3THENA5S-A4$ SW5-M4SW4 
*SCsGOTO2760 srem 43 

2180 IFSC> - W 5 ANDSC< W 4 THENW5 • SC s GOTO 2 770 

srem 248 

2190 GOSUB2510 S PRINT" (HOME) { BLK ) 

{ 21 GIU'H 12 SPAZI) PER GIOCARE PRB 
HI (RVS) {8LK)S" srem 122 

2200 GETZ$SIFZ$-""THENF0RCC-55321T055324S 
POKECC, INT ( RND (1)* 7+1 ) S NEXT: rem 92 

2210 POKE55165, INTERNO ( 1) *7+1) s rem 133 

2220 IFZ$-""THEN2200 . s rem 71 

2230 IFZS-"S*THEN1120 srem 155 

2240 IFZ$-"N"THENPRINT"{CLRHBLU)"sPOKECS 
,27 send srem 251 

2250 GOTO2190 srem 206 

2260 K-K+l :M-41 sN-40 :0-39 : R- INT (RND ( 1) *7+ 
1) . srem 165 

2270 IFK>3ANDK<110THENPOKECS,KK:KK-KK+31 

srem 234 

2280 POKEQl,G: POKEQ2,G: POKEQ3 ,G: POKEQ4 r Gs 
POKEQ5 , G : POKEQ6 , G : POKEQ7 , G s POKEQ8.G 

srem 158 

2290 POKEQ1+C »R: POKEQ2+C, I NT (RND (1) +7+1) : 
POKEQ3+C , R: POKEQ4+C, INT {RND (1) *7+1) 

srem 15 

2300 POKEQ5+C,R:POKEQ6+C, INT (RND (1) *7+1) : 
POKEQ7+C »R: POKEQ8+C, INT (RND (1) *7+1) 




t rem 

23 

2310 

FORT» ITO 1 0 : NEXT 

srem 

236 

2320 

IFK73THENG-46: PRINT" {CLR}" 

: rem 

205 

2330 

IFK<0THENQl*Ql-O:Q2*Q2-MsQ3-Q3+O:Q4« 


Q4+M:Q5«Q5-N:Q6*06+N:Q7»Q7- 

1;Q8« 

-Q6+1 



: rem 

177 

2340 

RETURN 

: rem 

169 

2350 

PRINT" {CLR} " : RETURN 

: rem 

72 

2360 

PRINT" { 3 GIU* }" :CH»1160 :E« 

• 1 




: rem 

134 

2370 

J0*1S- tPEEK (56321J AND15J 

: rem 

23 

2380 

FB-PEEK < 56321) AND 1 6 

srem 

67 

2390 

I F J 0 « 8THENE =B+ 1 

: r em 

158 

2400 

IFJ0*4THENE=E-1 

srem 

148 

2410 

IFE»0THENE«26 

: rem 

33 

2420 

IFE» 27THENE» 1 

:rem 

36 

2430 

POKECH , E : PO KECH +C , 7 

srem 

185 

2440 

FORT* 1TO100 : NEXT 

: rem 

32 

2450 

POKECH+C 1 1 

: rem 

B0 


2460 IFPB-0ANDCH-1160THENNl$-CHR$(E+64) :C 
H-CH+l:E=l:GOTO2370 srem 3 

2470 I FFB- 0 ANDCH -1161 THENN 2$ -CHRS ( E+ 6 4 ) sC 
H-CH+lsE-1 SGOTO2370 srem 6 

2480 IFFB-0ANDCH-1162THENN3S-CHRS IE+64) :C 



2490 

2500 

2510 

2520 

2S30 

2540 

2550 

2560 

2570 

2580 

2590 

2600 

2610 

2620 

2630 

2640 

2650 

2660 

2670 

2680 

2690 

2700 

2710 

2720 

2730 

2740 

2750 

2760 

2770 


H-CH+lsE-32 : GOTO2370 srem 61 

I PCH - 1 1 6 3THENN 5$ -NI 8+N2 $+N 3 $ : RETURN 

srem 96 

GOTO2370 srem 204 

POKE53 281,1 srem 87 

PRINT” {CLR} { 2 SPAZI) (BLK) 

{ 10 SPAZI) EROI DI CYLON ZAP"sPRINTs 
PRINT” (RED) ( 12 SPAZI )S MIGLIORI PUN 
TEGGHOFF)" srem 93 

PRINT" {KOMEHGIU' ){BLK)( 4 GIU'} 

{ 14 SPAZI }"AlS"..."Wl s rem 127 

PRINT” { BLU ){ 2 GIO'H 14 SPAZI )"A2$" 


<t^2 

PRINT" (CRN) ( 

. . . "W3 

PRINT" { PUR) { 

- • + "W4 

PRINT” (RED) { 

... “WS 
RETURN 

POKE54296 , 15 
73 S POKE 54276, 129 
FORCO - 1 2 7T08 STBP 
POKECS , CO 


203 

2 GIU * } { 14 SPAZI )"A3$" 
srem 205 
2 GIU ' } { 14 SPAZI }"A4$” 
Srem 78 
2 GIU ' } { 14 SPAZI }"A5S" 
srem 209 
srem 175 
POKE54277, 43s POKE54278, 
srem 226 
17 s'rem 196 

srem 76 


FORT- 1TO100 S NEXT S NEXTCOs POKECS , 1 1 

srem 184 


I FS 1 - 0THENSC -SC+1 S GOSUB 1 8 9 0 : PO KEN 1 , 3 
2:Nl-1042sSl-l srem 45 
IFS2-0THENSC-SC+1 SGOSUB1890 : PO KEN 2 , 3 
2:N2-1922:S2-1 srem 57 
IFS 3-0THENSC=SC+l : GOSUB 1890 : PO KEN 3 , 3 
2 :N3-1464 :S3-1 srem 63 
I FS 4 - 0THENSC- SC+ 1 : GOSUB 1 8 90 s PO KEN 4 , 3 
2:N4-1502sS4-l srem 61 
FORS0-54272TO54272+28;POKES0,0:NEXT: 
BOM-BOM- 1 : GOTO1260 srem 68 
S-54 2 72 : FORE-STOS+28 : POKEE , 0 : NEXT 

srem 104 

POKE54296, 15sPOKES4277, 51 : POKE54278, 
84 ' srem 171 
POKE5 4 2 7 6 , 1 7 : FORJ • 1T04 0STEP 4 : POKE 5 4 2 
73,J:POKE54272,255-J-25:NEXT 

srem 129 

FORT- 1TO100; NEXT: PO KE54 276, 32: FORT- 1 
TOSO : NEXT s rem 134 
FORE-STOS+28 : POKEE , 0 : NEXT : RETURN 

srem 175 


PRINT" { HOME) INSERIRE INIZIALI NUMERO 
1":GOSUB1745:GOSUB2360:A1$-N5$ SCOTO 
2190 srem 116 

PRINT" {HOME) INSERIRE INIZIALI NUMERO 
2" :GOSUB1745:GOSUB2360 : A2$-N5$ :GOTO 
2190 srem 119 

PRINT" {HOME} INSERIRE INIZIALI NUMERO 
3" :GOSUB1745 SGOSUB2360 : A3S-N55 :GOTO 
2190 srem 122 

PRINT” (HOME) INSERIRE INIZIALI NUMERO 
4” : GOSUB174 5 :GOSUB2360 : A4$-N5$ sGOTO 
2190 srem 125 

PRINT" {HOME) INSERIRE INIZIALI NUMERO 
5" : GOSUB1745 :GOSUB2360 : A58-N5S :GOTO 
2190 srem 128 


98 «manne* 



Allegre, 
Fresshe, 
Spiritose, 
Prafithe . 


t*, 

‘ * ^ 



di Matt Giwer 

trad. ed edatt. di CI. Barzaghi 
e R. Comlnl 


Siete In grado di manovrare attraver- 
so un labirinto rotante' battendovi 
contro li tempo e evitando ri stancati - 
le Inseguimento del Predoni? Impos- 
sibile? Provare per credere. Sono In- 
cluse versioni per II VTC 20 nella con- 
figurazione standard {con Joystick) e 
per il C64 con Joystick. 


D urante una sosta per rifornirvi di 
carburante su di un pianeta fuori 
mano, incontrerete un misterioso vec- 
chio che vi offre la chiave per un fanta- 
stico tesoro sepolto nelle viscere di 
una montagna* Molti hanno cercato di 
raggiungerlo ma tutti sono stati ferma- 
ti dagli Innominabili Predoni del Labi- 
rinto. Il vecchio ha il controllo princi- 
pale di un labirinto rotante che sta a 
guardia del tesoro. In un ultimo anelito 
di vita mette nelle vostre mani un vec- 
chio joystick Commodore. "Premi un 
pulsante", dice, "e controllerai II labi- 
rinto 1 '. Dal momento che non sapete 
reistere ad una avventura, partite alla 
volta delia montagna. 

Quando la raggiungete, vi trovate su di 
un Lato di un Labirinto in lento movi- 
mento. Di tanto in tanto il Predone ros- 
so cupo vi attraversa il cammino. Se 
premete il pulsante del joystick, il labi- 
rinto aumenta ta propria velociti; se la- 
sciate fi pulsante rallemeri. Armati di 
questo segreto entrate nel labirinto per 
raggiungere il tesoro verso l'estremiti 
destra delio schermo. 


Shuttle In fuga 
versione per 11 VIC 20 


Note alla versione per C64 

La versione Commodore C64 di "labi- 
rinto rotante" è stata ribattezzata 
"Shuttle in fuga"' poiché ha come sog- 
getto una navetta spaziale. 

"Shuttle In fuga” funziona suppergiù 
come le altre versioni. La differenza 
principale è data dall aggiunta di una 
quantità chiamata GAS. Iniziate con 
2000 uniti di carburante che consu- 
mate ad un ritmo di 60 uniti al secon- 
do, sia che lo Shuttle si muova o no. Se 
toccate un muro o dei Predoni perdete 
100 uniti ogni sessantesimo di secon- 
do. Quando avete esaurito il carburan- 
te, il gioco ha termine. Fortunatamen- 
te, potete rifornire i vostri serbatoi rag- 
giungendo I estremiti destra dello 
schermo. 

Se volete Interrompere il gioco per un 
attimo, tenete premuto il tasto SHIFT. 
Se volete Interromperlo più a lungo, 
usate SHIFT LOCK. 

Potete aumentare la volocità di movi- 
mento dei muri tenendo premuto il 
pulsante di sparo del Joystick. Questo 
non fari apparire i varchi più rapida- 
mente, ma aumenterà la velociti di 
scorrimento dei varchi gii presenti. Lo 
svantaggio consiste nel fatto che men- 
tre il pulsante è premuto, il vostro car- 
burante viene consumato a velocità 
doppia. 

La programmazione di "Shuttle in fu- 
ga" ha messo In luce dei problemi inte- 
ressanti. Il primo consiste nei "lampi" - 
piccole chiazze di neve ■ che appaiono 
sullo schermo. Normalmente questo 


non provoca problemi, ma se cercate 
di usare II registro di controllo delle 
collisioni fra SPRITE e sfondo del chip 
V1C-II, vi accorgerete che gli SPRITE 
collidono con L "lampi"! 

Il significato di tutto ciò consiste nel 
fatto che occasionalmente, senza alcu- 
na ragione apparente, lo Shuttle colli- 
derà e voi perderete 1 00 unità di car- 
burante. Dal momento che spostando 
il set di caratteri si eliminano I lampi, SI 
set suddetto è stato ricollocato In 
$3000. 

Un altro cavillo del C64 è rappresenta- 
lo dal fatto che II chip VIC-ll può guar- 
dare solo 1 6K di memoria contempo- 
raneamente. Quando accendete il vo- 
stro calcolatore. Il chip vede II primo 
blocco di 16K dalla locazione $0000 
olla locazione $3FFF. È stato deciso di 
lasciare le cose In questo stato, per 
semplicità. Questo significa che I dati 
degli SPRITE. li set di caratteri ricollo- 
cato, e l’intero programma BASIC de- 
vono essere concentrati In 16K. 

A causa di questa limitazione nell'oc- 
cupazione di memoria, quando H lin- 
guaggio macchina crea un set di carat- 
teri alla locazione $3000, distrugge le 
Istruzioni DATA nel programma. For* 
lunatamente, le istruzioni DATA non 
sono ulteriormente richieste, essendo 
già state inserite In memoria tramite 
istruzioni PQKE, 

Dal momento che II fatto di mandare 11 
programma In esecuzione ne distrug- 
ge una parte, assicuratevi di averne re 
g latrato una copia prima di dare il 
RUM. 


Q*2;RB»7673:RC-7665;RM-1 98 :S2-, 94 

:SN*1 i tetti 155 

30 H0-1 28:H3-32ìS-768O:RS*575ZO-0sZ1 -1 :SK 
-5:T2-22:TÌ -21 :SH=57 :ML-75Ì 8 : ZB-1 76 :LI 
•3 tram 250 

35 FORI -1 T04 : RE ADD { I ) ,K<I) :NEXT: JD*371 54 S 
J1 -JD-3:J2-Jl+1 sPOKEJD* 127 :rem 11 

40 FORI-1 T07 :FORJ-OTQ7 ;READA: POKE761 6+1*8 
+J, A:NEXTJ, I srero 82 

45 FORI “751 8T0761 4 ; RE ADA : POKE I * A : HEXT 

:rem 78 


10 PO KE 5 5 * 94 : POKE 56, 29 ; CLR : rem 25 

1 5 PRI NT " ( HOME ) w CHR$ ( 8 ) ; : SS- 36879 :CS»3686 
5:FF»255:POKECS, FF:F8-4 84 ; Z4-4 : Z5-5 :RL 
-62 :RR-63 srem 182 

20 DS=36B69:SE-01 64 :T3«23 :F4*44 :H4 -64 :V1 - 
36675 :0EFFKA ( J) »Z3+J*Z3+S+F8* ( JARDZl ) 

; retti 5 

25 DIMT{ 5) ,D{4) ,K{4) : Z3-3 :SP-1 60 ; KS-1 97 : Z 


60 SUPERVIC' 



50 POKfiSS-1 ,10:A$= H [RVS} {tfHT} { 3 SPAZI) 
{OFF}{RED)9{RVS} j 2 SPAZI H0FFHCYH)9 
(RVS) ( 2 SP AZ I } { OFF ) { PUR 1 9 { RVS } 

( 2 SPAZI} [OFFHGRNfStRVSH 2 SPAZI} 
[OFF] {BLU} 9 {RVS} { 2 SPAZ I ) {OFF} { YEL} 9 
(RVS) " ; F RI NT" ( HOME } " ; :FORI*0TO21 

: rem 242 

55 PRINTAS " { RVS} "CHRS ( 1 6G J " ” ; : NEXT : PRINT 
AS " ( RVS } " CHR$ { 1 60 } " { HOME }"j i POKE8 1 85 , 1 
60 treni 146 

60 FORI ■ OTOLI - 1 :POKES+Tl +T2* I , 61 :NEXT:POK 
ESS , 6 : POKEDS , FF : POKECS ,25: G0T02 6S 

:rem 2 

65 POKEVl , 240:OE-OE-2l treni 58 

70 FOR J * 0TO 5 ; I FT ( J ) ■ Z 0 THEN8 5 : rem 248 

75 TU) "TU) +Z1 :IFT( J) >SKTHENPGKEFNA( J) ,R 
S ; T ( J ) * Z 0 srem 96 

80 GOTO90 ;rem 10 

85 IF RND { Z 1 ) > S 2 THENT { J } « Z 1 : PGKEFN A ( J ) f SP 

: rem 1 3 

90 HBXT : POKEVl , Z0 : POKESL, El sSYSML; IFPEEK { 
SL) *El ORPEEK (SL) =SPTHENPO KES L , OS 




: rem 

138 

95 RETURN 

: rem 

78 

100 

IFROTHENllO 

: rem 

130 

105 

Ri «RND (Zi ) >.S:RD«T2+F4*Rl 

: RT* INT (RND { 


ZI ) * Z 5 ) *Z3+24-F0*Rl +S 

; rem 

T 80 

no 

POKEV 1,200: FOKERC+RM , FF t POKERB+RH 

,FF: 


IFR1THENÌ25 

: rem 

24 

1 1 5 

RM-RM+Z1 S IFRM>Z4THENRH-Z0 

: rem 

145 

1 20 

GOTOl 30 

: rem 

96 

125 

RM-RM-Z1 1 IFRMCZl THENRM-Z5 

: rem 

.14 8 

1 30 

POKERC+ RM , H 8 : POKERB+RM , Z 1 

; rem 

76 


1 3 5 PQKERT , SP : POKERT+ Zi , SP i RT « RT+ RD : RO- RO 
+ Zl :IFRO-T3THENRO«ZO: POKEVl , ZO ; RETURN 


:rem 73 

140 POKERT,RL:POKERT+21 ,RR: POKEVl ,Z0:RETU 
R H ;rem 137 

145 IFPEEK tSL}OOSTHEKEM»PEEK(SL) :GOTQ240 

:rem 118 

150 IFtPEEK(KS) -Hi) «Z G AND ( PEEK { Jl ) ANDH 3 ) T 
HEN165 trem 55 

1 55 l ZW* ( 2W+Z 1 ) ANDZ3MFZW-Z0THENZW-Z1 

trem 138 

160 QNZWGOSUB65, 100,65 :GOTOl 45 srem 49 

165 DI "Z0 : A* PEEK ( KS) : IFAO H4THEN1 95 

srem 138 


1 70 IF {PEEK ( J2) ANDH8) =Z0THENDI-Z4 ;GOTO205 




: rem 

21 

175 

J-PEBK(JI) :IF(JANDZ4) -ZOTHENDI-Zt :GOT 


0205 

% rem 

47 

180 

IF ( JAND8) >Z0THENDI- 2 : GOTO205 : rem 

202 

185 

IF( JAND1 6) -Z0THENDI-Z3 

: rem 

79 

190 

GOTO205 

: rem 

106 

195 

FORI - 1 TO4 : IFA-K ( I ) THENDI* I 

: rem 

130 

200 

NEXT 

: rem 

209 

205 

IFDI-Z0THEN235 

: rem 

67 

21 0 

IFDI "Z3THENOE“OE-SN: IFINT{ (SL-S>/T2>- 


(SL-S) /T2THEN2 35 

: rem 

48 

215 

I FD I - Z 4 THENOE - OE +SN 

: rem 

223 


220 EL-SL+D {DI ) : IFEL<S0RÉL>SE+T1 THEN2 3 5 

; rem 1 84 

22 5 POKEVl , 220 :E1=EM:EM* PEEK {EL} SlFEHOSP 
THEN240 ; rem 219 

230 POKESLi SP: OS =SH+DI :POKEEL,OS :SL»EL 

: rem 1 3 

235 ZQ-2 3- ZQ: POKEVl , 20 :O«ZQGOSUB70 i 1 00 ;GQ 
TOT 45 ; rem 1 92 

240 IFEM0224THEN255 srem 148 

245 POKEVl ,0:SN*SN+1 :SK«SK-1 S I FS K< 2THE NS K 
■ 2 : rem 228 

2 50 FORI « 1 T05 : POKESS , 2 5 : A*TAN ( I ) : POKESS , 8 
:A-TAN(I) :NEXT:GOT0265 srem 21 

255 PO KES L , RS : POKEVl , 0 s POKEVl +2, 1 29 SFORI* 
I 5TOOSTEP-1 : POKESS- 1 , ItA-TAN(I) sNEXT 

srem 166 

260 POKEVl +2,0: POKESS- 1 , 10:LI-LI-1 SIFLI-- 
1THEN270 srem T 93 

265 POKESL, El : SL-792 2 : OS -6 1 :EM=OS:El -EM:P 
OKESL, OS : POICES+Tl +T2 *LI , SP l GOTO! 4 5 

srem 47 

270 POKEVl , 0 : POKECS , FF: PO KES S , 4 2 : POKEDS f 2 
40:PRINT"{CLRJ {OFF} I 2 GIU'RWHT) HAI 
OSATO TUTTE LE{ 2 SPAZI}" : rem 161 
275 PRINTSPC (7} "ASTRONAVI * . » {GIU 1 ) " 

; rem 47 


SHUTTLC 
i IH FUGA 


SUPtRVlC* MM 61 




260 PRINTSPC (7) "PUNTI : "OEi IPOE>HITKENHI-0 
E SPRINT" { RVS} "f stani 76 

2B5 PRINT" ( 2 DES}{ 2 SPAZljRECORD 

{ 2 SPAZI J {OFF } : "HI :OE«0 trem 1 
290 PRINT"£GIO' } { 2 SPAZIÌGIOCHI ANCORA(S 
/N) ?" : POKECS , 25 : POKEBU , 0 treni 50 
295 GETAS i IFASO"S"ANDA$<>"N"THEN295 

, srem 55 

300 IPA$»"S"THENPOKECS , 255:LI-3 sSK-5 sGOTO 
50 treni 120 

305 PRINT"{CLR) {BLU) "f : POKEJD , FF: POKESS , 2 
7 spOKECS , 36 :END s rem 80 

310 DATA-22,12, 22, 36,-1, 20, 1,44 srem 252 
31 5 DATAI 26, 126,126,126,126,126,126,126 

treni 175 

320 DATAI 6, 56,108,198,130,254,146,130 

srem 78 

325 DATAI 30,146,254,130,198,108,56,16 

trem 83 

330 DATA 31 ,52, 100, 198, 100, 52, 31 ,0 

: rem 110 

335 DATA24B,44,33,99, 38,44, 246,0: rem 109 
340 DATAI 27,255,255,255,255,255,255, 127 

srem 193 

345 DATA2 54, 255, 255, 255, 255, 255, 255, 254 

srem 200 

350 DATAI 62,3, 134,0, 160,3,162,22, 169,30,1 
33,2,169,0,133,1 srem 5 

355 DATAI 77,1 ,133,251 ,24,165,1 ,105,22,133 
,1,144,2,230,2,177 trem 112 

360 DATAI , 133,252, 165,251 ,145,1,165,252,1 
33,251,202,208,230,200,200 trem 242 

365 DATA200, 162,22,169, 31 , 1 33,2, 1 69, 228,1 
33,1,177,1,133,251,56 trem 22 

370 DATAI 65,1 ,233,22,133, 1,176,2, 198,2,17 
7,1,133,252,165,251 trem 177 

375 DATAI 45,1 ,165,252, 133,251 ,202,208,230 
,200,200,200,198,0,208,166,96 

tram 153 


Shuttle in fuga 
versione per II C64 

100 GOSUB3000 trem 212 

110 PSINTCHR5 (142) trem 8 

120 IF PEEK (1 6378)01 6 THEN GOSUB 10000:6 
OSUB 50000 trem 209 



130 

V-1 3*4096:CO-50 

: rem 

246 

140 

POKE V+1 6,0 

: rem 

8 

150 

POKE V+39,1 sPOKEV+40,1 

; rem 

186 

160 

POKE V+ 0 , CO t PO KEV+ 4 , CO - 2 s POKEV+ 5 , 

221 



: rem 

80 

170 

POKE V+l , 200 

: rem 

55 

ISO 

POKE V+2 ,CO 

; rem 

57’ 

190 

POKE V+3,179 

: rem 

74 

200 

POKE V+2 1,3 

; rem 

4 

210 

POKE V+39, 1 sPOKEV+40, 1 iPOKEV+41 , 8 1 POK 


EV+42,1 

trem 

23 

220 

POKE 2040,245 

: rem 

80 

230 

POKE 2041 ,246:POKE2043, 246 

5 rem 

77 

240 

POKE 2042,247 

: rem 

86 

250 

FOR K*1 TO 500 : NEXT KsPOKÉV+21, 

7 



; rem 

227 

260 

GOSUB 2000 

: rem 

21 8 

270 

1-200 

trem 

177 

280 

P-1 

; rem 

88 

290 

Q-Q+.01 *P 

: rem 

174 

300 

P-P+. 1 tC-C+T 

: rem 

83 

310 

I-I-Q 

: rem 

225 

320 

IF PEEK (2042) «248 THEN POKE 

2042, 

254 : 


G0T034Q 

: rem 

52 

330 

IF PEEK (2042) -254 THEN POKE 

2042, 

248 H 



; rem 

43 

340 

POKE V+l ,I:POKEV+3, 1-21 :POKEV+5, 1+21 ' 



: rem 

49 

350 

POKES+22 , P2 : POKES+23 , 10R(16 

-P2/Ì 6) *16 



: rem 

47 

360 

P2-P2+P2/244 

; rem 

80 

370 

IF O60THEN POKEV+23,4 

: rem 

179 

380 

IF C-20THEN POKEV+23,4 

; rem 

176 

390 

IF 040 THEN POKEV+23 , 0 :POKE2042 , 

248 



: rem 

170 

400 

IF C<70 THEN 290 

trem 

21 1 

41 0 

POKE 2040,249 

: rem 

85 

420 

POKE 2043, 250 :POKEV+6,CQ: POKEV+7, 

ItPO 


KEV+21 , 1 5 

; rem 

164 

430 

Q-Q+.01 *P 

; rem 

170 

440 

P=P+* 1 :C*C+1 :C2=C2+a 6 

: rem 

72 

4 50 

I“I-Q 

; rem 

230 

460 

IF PEEK ( 2042) *248 THEN POKE 

2042, 

254; 


GOTO* 80 

:rem 

62 

470 

IF PEEK (2042) “254 THEN POKE 

2042, 

248 



: rem 

48 

480 

POKE V+l , I :PQKEV+5, 1+21 

: r em 

20 

4 90 

NR= I +C 2 *C 2 : NC=CO+C 2 ■ 3 

; rem 

153 

500 

POKE V+7,NR: POKEV+1, NR-21 :POKEV+6 

, NO; 


PGKEV+2 , NC 

: rem 

119 

510 

IF C-83 THEN POKE 2 04 3 , 2 5 1 : POKE204 1 , 2 


53 

: rem 

241 

520 

IF C=86 THEN POKE 2043,252 

: rem 

0 

530 

IF C=89 THEN POKE V+21,5 

trem 

187 

540 

POKES+22 , P2: POKES+23, 10R{1 6- 

-P2/16J *16 



trem 

48 

550 

P2=P2+P2/244 

: rem 

81 

560 

IF I>25 THEN 430 

; rem 

222 

570 

POKE S+4 , 128 

trem 

68 

580 

POKE V+5 , 1+21 

t rem 

133 

590 

1=1-2 : IFI>0 THEN580 

: rem 

24 

600 

POKE V+21 , 1 

trem 

6 

610 

FOR J=1 TO 2000 tNEXT 

trem 

20 

620 

print" (homeH io desHwhtH 

2 SPAZI) 


ORBITA RAGGIUNTA* » . H 

: rem 

144 

630 

FOR 1=1 TO 1000: NEXT 

: rem 

20 

640 

POKE 2040, 244 

: rem 

85 

650 

POKE V , 0 t POKEV+1 ,117 

: rem 

92 

660 

FOR 1*0 TO 348 STEP2 

: rem 

233 

670 

POKE V, I AND 2 5 5 : POKEV+1 6,1/255 




: rem 

151 


62 - Super vie* iau 




680 

NEXT 

: rem 

221 

690 

FOR 1=0 TO lOOOiNEXT 

: rem 

25 

700 i 

GOTO 4000 

: rem 

148 

710 

POKE 53281 , 1 2:POK£53280, 1 2; 

PRINT" 



{WHT} 

: rem 

65 

720 

END 

: rem 

112 

2000 

S* 542 72 

: rem 

86 

201 0 

POKES+24, 1 5+1 6+32 :POKES+23 

,1+16*5 




: rem 

36 

2020 

POKES+5 , 0 

: rem 

2 

2030 

POKES + 6, 1 6*1 5 + 1 5 

: rem 

92 

2040 

POKES+4 , 1 29 

; rem 

111 

20 50 

POKES + 1 , 1 1 

: rem 

51 

2060 

P2 = l 00 SRETURN 

: rem 

50 

3000 

POKE 53281 , 0:POKE53280,0 

: rem 

24 

3010 

PRINT" £CLR) " 

: rem 

40 

3020 

PRINT" { 5 GIU' 3 " 

; rem 

2 35 

3040 

T=1 2 

: rem 

187 

3050 

PRINTTAB(T) " [<7>] (RVSÌE{ 2 

SPAZI} 



{DES} {DES} {DES} {DES} {DES} 



{ 3 SPAZI } {DES } { 3 SPAZI} {DES 3 



{ 3 DES}£[ 2 SPAZI}" 

: rem 

53 

3060 

PRINTTABTT) " {RVS} { 3 DES} 

{DES} 



{DES} {DES} { 2 DES} { 3 DES} 



{ 2 DES] { 3 DES) n 

: rem 

248 

3070 

PRINTTAB(T) "[<*>) {RVS] £<* 

>] {DES} 



{ 3 SPAZI }{DES} [DES} { 2 

DES} 



{ 3 DES} { 2 DES} { 3 DES} 




{ 2 SPAZI}" 

: rem 

96 

3080 

PRINTTAB(T) " {RVS} { 2 DES] 

{DES} 



{DES} {DES} {DES) { 2 DES} 

{ 3 DES} 


{ 2 DES} { 3 DES} " 

: rem 

2 50 


3090 PRINTTAB(T) " {RVS}{ 2 SPAZI HOFFU 
{ RVS } [DES} {DES} {DES} [OFF} [<*>1~ 

{ RVS } (OFF } £, ( RVS } { 2 DES) ( 3 DES } 

{ 2 DES) [OFF} [<*>) (RVS) ( 2 SPAZI) 
{DES} {OFF} | < * > 1 {RVS} { 2 SPAZI}" 

; rem 141 

3100 PRINT * rem 81 

3110 PRINTTAB (T) M {CYN} {RVS} {OFF} 

{ 2 SPAZIHRVS! {OFF} {RVS} (OFF} 

{ 5 SPAZI} (RVS}£{ 2 SPAZI} {OFF} 

{RVS} {OFF} {RVS} {OFF} (RVS}£ [<*>] 
[OFF} { RVS } £ f<*>]{0FF}" : r em 13S 

3120 PRINTTAB (T) 1r {RVS} {OFF}{ 2 SPAZI} 
{RVS} [<*>} {OFF} { 5 SPAZI} {RVS} 

{OFF } ( 3 SPAZI} {RVS} {OFF} {RVS} 
{OFF} {RVS} {OFF} (RVS} {OFF} {RVS} 
(OFF} {RVS} (OFF}" : rem 182 

3130 PRINTTAB(T) " {RVS} {OFF} { 2 SPAZI) 
{RVS} {OFF}[<*>] {RVS} {OFF} 

[ 5. SPAZI} {RVS) { 2 SPAZ I } {OFF } 

{ 2 SPAZ 111 RVS} {OFF} {RVS} {OFF} 
{RVS} (OFF } { 3 SP AZ I ] { RVS } 

{ 3 SPAZI} (OFF}" irem 19 

3140 PRINTTAB(T)" {RVS) {OFF} ( 2 SPAZI] 
(RVS} (OFFÌ {RVS} ( OF F ] ( 5 SPAZI} 
{RVS} (OFF } { 3 SPAZI) {RVS} {OFF} 
[RVS] {OFF} {RVS} {OFF) [<C>I {RVS} 
[OFF} {RVS} {OFF} {RVS} {OFF}" 

;rem 57 

3150 PRINTTAB (T) 11 {RVS} {OFF} { 2 SPAZI} 
{RVS} {OFF} {RVS} { OFF } { 5 SPAZI} 
{RVS} {OFF} { 3 SPA2I J [<*>] {RVS) 

{ OF F } £ | < * > ] [ RVS } (OFF}£ {RVS} [OFF} 
{RVST {OFF}" :re m 70 

3999 RETURN :rem 190 

4000 V= 1 3*4096: PO KE 53281 , 0 : PQKE5 3 2 80 , 0 

: r em 71 

4010 POKE V+21 ,G:POKEV+23,0 :rem 223 



4020 

GOSUB 2000 :POKE 3+5,7*16 

: POKES+6, 

249 


: POKES + 4 , 1 20 

: rem 

226 

4030 

POKE V+40, 03 : POKEV+41 ,07 

: POKEV+4 2 

,03 


:POKEV+43, 07 : POKEV+44 , 03 

: POKEV+4 5 

,07 



: rem 

21 4 

4040 

POKE V+4 6,03: FOR 1 = 1 TO 

6 : POKE 

V+2 


*1 , (36+40+1) AND255:NEXT 

: rem 

129 

4050 

POKE V+l 6, 64 :POKE 2040, 244 iPOKEV, 

30: 


POKEV+1 ,148 ;POKE V+21,255 :rem 

179 

4 060 

FOR 1=2041 TO 2047; POKEI 

,255: NEXT 



: rem 

97 

4 070 

PRIN7"{CYN} [CLR}G A S 

: rem 

135 

4080 

PRI NT "02000 " 

; rem 

143 

4090 

PRINT"PIJNTI t" 

5 rem 

104 

4100 

PRINT"00000" 

: r em 

134 

4110 

P(0) =1 029 : P ( 4) =1 994 :P ( 1 > 

= 1 039 :? ( 5) =2 


004 :P (2) *1 049 ;P (6) =2014 ; 

P ( 3) =1059 



: rem 

51 

4120 

SYS 4 9152 

;rem 

20 3 

41 30 

POKE P(0) ,227 

: rem 

143 

4140 

IF PEEK ( 2 ) =255 THEN 20000 :rem 

250 

41 50 

IF PEEK (653) =1 THEN 4150 

: rem 

21 2 

4160 

IF RND ( 1 ) > . 05 THEN 4140 

: rem 

137 

4170 

IF RND (1 ) >.5 THEN 4200 

: rem 

37 

4180 

P=RND ( 1 ) *5 : IF PEEK (P ( P) ) < > 1 60 THEN 4 


1 80 

: rem 

92 

41 90 

POKE P(P) ,227:G0T041 40 

: rem 

241 

4200 

P- RND (1)*3+4:IF PEEK (P(P) ) <>1 60 THEN 


4 200 

: rem 

171 

421 0 

POKE P{P>, 228:G0TO41 40 

: rem 

235 

5000 

FB=(J AND 16) 

: rem 

95 

501 0 

IFFL= 0 AND FB = 0 THEN POKE 

2,0: POKE 

4 9 


2 90, 2 ; GOTO 5030 

:rem 

1 8 

5020 

IF FL-16 AND FB=1 6 THEN 

POKE 2,0: 

POK 


E 49290,3 

: rem 

71 

5030 

FL= F9 

; rem 

31 

5040 

IF (J AND 8) =0 AND DX< 4 

THEN QX=DX+ 1 


: GOTOSO 60 

: rem 

136 

5050 

IF {J AND 4) =0 AND DX>-4 

THEN DX= 

DX- 


1 

; rem 

1 20 

5060 

IF (J AND U-D AND DY>-4 

THEN DY« 

DY- 


1 : GOTOSO 80 

: rem 

185 

5070 

IF (J AND 2} *0 AND DY< 4 

THEN DY-DY+1 



:rem 

74 

5080 

X=PEEK(V) +PEEK ( V+1 6 ) *256 

: rem 

126 

5085 

Y=PEEK (V+l ) 

: rem 

144 

5090 

NX= X+DXt I F NX> 2 1 AND NX<358 THEN 
E V, NXAND255: POKEV+1 6, NX/256 

POK 



:rem 

25 

5100 

NY-Y+DY:ÌF NY<2G THEN NY 

^210 




: rem 

127 

5110 

IF N Y> 2 1 0 THEN NY=20 

;rem 

67 

51 20 

POKE V+1 i NY 

: rem 

124 

51 30 

RETURN 

:rem 

169 

1 0000 1-1 561 6:TI$-"OOOOOO rt 

: rem 

22 

10005 PRINT" { HOME} [WHT} { 12 DES } PRONTO IN 


"LE FT$ (STR$ { 1 40-INT ( TI/60 ) ) ,4) " 

SEC 


ONDI " 

s rem 

155 


10010 READ A:IF A=256 THEN RETURN 

srem 66 


sap£wv>c* 3/S4 63 



10020 
10030 
1004 0 
10050 
10060 

10070 

looeo 

10090 
10100 
101 10 
10120 
101 30 
101 40 

101 50 

10160 
101 70 

101 BO 

10190 

10200 

10210 
1 0220 
10230 
10240 
1 02 50 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
1 0380 
10390 
10400 
1041 0 
1 0420 
10430 
1 0440 


POKE 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


I,À:I*I+1 :GCTO 10005 
0,0,0, Q,Q, 0,0 
0,0,24,0,0,28,0 
0,31 ,0,0,31 ,255,240 


0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 
0, 0,0, 0, 0, 0, 0 
0,0, 0,0, 0,0,0 
0,0,71 ,192,0,247,192 


0 , 0 , 0 , 0 , 0 , 0, 0 

0 , 0 , 0 , 0 , 0 , 0 , 0 

0 , 0 , 0 , 0 , 0 , 0,0 

0 , 0 , 0 , 0 , 0 , 0, 0 

0 , 0 , 0 , 0 , 0 , 0,0 

0 , 0 , 0 , 0 , 0 , 0,0 

0 , 0 , 0 , 0 , 0 , 0, 0 

0 , 0 , 3 , 128 , 0 , 15,192 

0 , 15 , 192 , 0 , 15 , 192,0 

1 5 . 192 . 0 . 1 . 252 . 0.1 

116 . 0 . 1 . 21 2 . 0 . 0.88 
0 , 0 , 80 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 

0 , 0, 0, 0 , 0, 0, 0 
0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 1 , 252,0 

1 . 252 . 0 . 1 . 252 . 0.1 

254 . 0 . 7 . 248 . 0 . 6.249 
0 , 2 , 251 , 0 , 6 , 122,0 

3 . 242 . 0 . 0 . 240 . 0.0 

248 . 0 . 0 . 60 . 0 . 0.120 


srem 

166 

: rem 

102 

: r em 

215 

: rem 

162 

31 


* r em 

78 

,0 

: rem 

77 

: rem 

107 

: rem 

108 

: rem 

100 

: rem 

101 

: rem 

227 

2 : rem 

27 

247 

: rem 

137 

192 

: rem 

140 

3: rem 

37 

247 

: rem 

144 

192 

: rem 

142 

15 

: rem 

81 

1,240 

srem 

225 

: rem 

102 

:rem 

103 

: rem 

104 

: rem 

105 

srem 

106 

; rem < 

107 

srem 

108 

i rem 

125 

: rem 

178 

srem 

115 

: rem 

117 

:rem 

160 

; rem 

105 

srem 

106 

: rem 

107 

srem 

108 

: rem 

109 

: rem 

110 

e rem 

21 7 

: rem 

60 

srem 

189 

: rem 

62 

: rem 

67 

srem 

114 


104 50 

DATA 

0 ( 0r 56,0,0, 56, 0 

: rem 

226 

10460 

DATA 

0,96,0,0,96,0,0 

S rem 

235 

10470 

DATA 

8,0,0, 32,0, 0, 0 

t rem 

171 

1 04 80 

DATA 

0,0,0,0,0,0,64 

srem 

169 

104 90 

DATA 

0,0,240,0,0,240,0 

srem 

60 

10500 

DATA 

1,240,0,2,240,0,2 

: rem 

57 

10510 

DATA 

240,0,2,240,0,2,240 

: rem 

159 

10520 

DATA 

0,3,240,0,3,240,0 

srem 

60 

10530 

DATA 

3,240,0,3,240,0,3 

srem 

64 

10540 

DATA 

240,0,3, 240,0,3,240 

: rem 

164 

10550 

DATA 

0,3,240,0,7,96,0 

s rem 

28 

1 0560 

DATA 

7,96,0,1 5,224,0,31 

srem 

134 

10570 

DATA 

112,0,31,240,0,0,0 

srem 

109 

10580 

DATA 

7,192,0,7,192,0,7 

srem 

93 

10590 

DATA 

192,0,7,192,0,7,192 

srem 

195 

10600 

DATA 

0,7,192,0,7,192,0 

srem 

79 

1 061 0 

DATA 

7,192,0,7,192,0,7 

s rem 

87 

10620 

DATA 

192,0,7,192,0,7,192 

srem 

109 

1 0630 

DATA 

0,7,192,0,7,192,0 

srem 

82 

1064 0 

DATA 

7,192,0,7,192,0,7 

s rem 

90 

10650 

DATA 

192,0,7,192,0,7,192 

s rem 

192 

10660 

DATA 

0,3,128,0,0,0,0 

s rem 

221 

1 0670 

DATA 

0,2,0,0,7,192,0 

3 rem 

229 

1 0680 

DATA 

7,192,0,6,192,0,4 

s rem 

90 

1 0690 

DATA 

192,0,3,64,0,6,192 

: rem 

141 

10700 

DATA 

0,1,192,0,4,0,0 

: rem 

219 

10710 

DATA 

7,192,0,7,128,0,7 

: rem 

87 

10720 

DATA 

64,0,7,192,0,1,192 

: rem 

134 

10730 

DATA 

0,5,192,0,6,64,0 

: rem 

30 

10740 

DATA 

7,192,0,7,192,0,0 

s rem 

84 

10750 

DATA 

128,0,3,128,0,0,0 

: rem 

72 

10760 

DATA 

0,0, 2,0,0, 1 ,0 

: rem 

115 

10770 

DATA 

0, 6, 64, 0,0,64, 0 

s rem 

235 

10780 

DATA 

4,128,0,3,64,0,6 

: rem 

36 

10790 

DATA 

0,0, 1 ,0,0, 0,0 

s rem 

116 

1 0 800 

DATA 

0,0,0,0,0,128,0 

E rem 

214 

10810 

DATA 

1 , 64,0, 6,0,0, 1 

srem 

174 

10820 

DATA 

0,0,5,0,0,6,64 

: rem 

178 

10830 

DATA 

0,0, 0,0, 4, 0,0 

s rem 

114 

10840 

DATA 

0,128,0,3,1 28,0,0 

irem 

72 

10850 

DATA 

0,0, 0,0,0, 0,0 

ì rem 

112 

10860 

DATA 

0,0, 0,0, 0,0,0 

srem 

113 

10870 

DATA 

0, 0, 0,0, 0,0,0 

srem 

114 

10880 

DATA 

0, 0,0, 0,0, 0,0 

srem 

115 

10890 

DATA 

0,0, 0,0, 0,0,0 

srem 

116 

10900 

DATA 

0, 0, 0,0, 0,0, 0 

srem 

108 

1091 0 

DATA 

0,0, 0,0, 0,0,0 

s rem 

109 

10920 

DATA 

0,0,1,128,0,6,128 

s rem 

75 

10930 

DATA 

0,2,64,0,5,192,0 

: rem 

28 

10940 

DATA 

3,128,0,1 ,252,0,1 

srem 

73 

1 0950 

DATA 

252,0,1,236,0,1,126 

s rem 

176 

10960 

DATA 

0,3,248,0,2,120,0 

; rem 

72 

10970 

DATA 

0,248,0,0,120,0,0 

srem 

68 

10980 

DATA 

11 2,0, 0,120,0,0,120 

srem 

158 

10990 

DATA 

0,0,48,0,0,48,0 

s rem 

237 

11000 

DATA 

0, 0, 0,0,0, 0,0 

: rem 

100 

11010 

DATA 

0, 0,0, 0,0, 0,0 

srera 

101 

11020 

DATA 

0,0, 0,0, 0,0,0 

srem 

102 

11030 

DATA 

0, 0,0,0, 0,0,0 

: rem 

103 

11040 

DATA 

0,16,0,0,16,0,16 

s rem 

13 

11050 

DATA 

56,16,10,16,160,4,16 

s rem 

229 

11060 

DATA 

64,10,124,160,1,255, 

0 : rem 

16 

11070 

DATA 

1 ,255,0,11,255,144,127 





; rem 

73 

11080 

DATA 

255,252,11,255,144,1 

,255 





s rem 

181 

11090 

DATA 

0,1,255,0,10,124,160 

s rem 

217 

11100 

DATA 

4,16,64,10,16,160,16 

s rem 

224 

1 ilio 

DATA 

56,16,0,16,0,0,16 

srem 

70 

11120 

DATA 

Of0f0fO/O|Of25& 

srem 

212 


20000 SOQ sFOR 1 = 0 TO 4 ; S05C+ ( PEEK ( 1 1 4 8- 


64 SOPO* V1C» 344 



20010 

20020 

20030 

20040 

20050 

20060 

20070 

20080 

20090 

201 00 
201 10 
201 20 

201 30 
201 40 
50000 
50010 


5001 5 


50020 

50030 

50040 

50050 

50060 

50070 

50080 

50090 

50100 

50110 

501 20 

501 30 
501 40 
50 1 50 

501 60 

50170 
501 80 

501 90 

50200 
5021 0 
50220 

502 30 
50240 
50250 
50260 
50270 



I)-4S) *1 Ott :NEXT I 


: rem 

9 

IF H<SC THEN H-SC 


: rem 

230 

POKE S + 4 * 1 28 


irem 

156 

POKE 1 3*4096+21 ,0 


t rem 

111 

FOR 1=1 TO 1 000 :NEXT I 

: rem 

186 

FRI NT H { CLR } GAS TERMINATO, , 

. (GIU 

M 



: rem 

98 

PRINT "HAI TOTALIZZATO [WHT} "SC" 


{CYN} PUNTI 


: rem 

236 

FRI NT " RECORD { WHT] ”H 

"{CYN} 

: rem 

151 

PRINT 11 { 3 GIU 1 } ( 11 

SPAZI } ANCORA? 1 

S/N) " 


: rem 

ie 

PRINT 11 [GIU 1 } OPPURE 

PREMI 

IL PULSAN 

TE PER RIPARTIRE 


; rem 

173 

GETAS 


: rem 

56 

IF A$ - "N 11 THEN END 


i rem 

189 

IF ( PEEK ( 56320) AND 

1 6} -0 

THEN 

GOTO 

4000 


: rem 

30 

IF A$0"Tf" THEN 20100 

: r em 

35 

GOTO40Q0 


; rem 

244 

1-491 52 sTI$""000000 

m 

: rem 

28 

PRINT" ( HOME) {WHT} { 

12 DBS } PRONTO IN 

"LEFTS (STRS (97-1 NT ( T I / 6 0 } > 

,4)* 

SECO 

NDI " 


: rem 

118 


READ A : IF A» 2 56 THEN PRINT" {HOME} 

[ IO DES}( 21 SPAZI} {SPAZI } ” : RETURN 

; rem 43 

IF A*-1 THEN 1-49920 : GOTO 50010 

: rem 1 36 

IF A*-2 THEN 1*50688 : GOTO 50010 



: rem 

141 

POKE 

I, A:I=I+1 :GOTO 50010 ;rem 

172 

DATA 

120,169,0,141 ,20, 3,169 



: rem 

74 

DATA 

1 95,141 ,21 ,3,88,173,14 



: rem 

83 

DATA 

220,41 ,254,141 ,14,220,165 



t rem 

221 

DATA 

1 ,41 ,251 ,133,1,160,0 ; rem 

220 

DATA 

185, 0,208,1 53,0,48, 185 



: rem 

91 

DATA 

0,50,153,0,50,185,0 ;rem 

169 

DATA 

209,153,0,49,185,0,211 



: rem 

76 

DATA 

\ 53,0,51 ,185,0,21 2, 153 



: rem 

69 

DATA 

0,52,1 85,0,21 3,1 53,0 : rem 

223 

DATA 

53,185,0, 21 4, 153, 0,54: rem 

27 

DATA 

1 05,0,21 5,153,0,55,169 



: rem 

86 

DATA 

1 5,141 ,1 56,200,200,208, 200 



: rem 

6 

DATA 

165,1,9,4,133,1,173 : rem 

iee 

DATA 

14, 220,9,1,141 ,14, 220:rem 

18 

DATA 

1 69, 28,141 ,24, 208,169,15 



: rem 

199 

DATA 

141,156,200,169,255,141,15 



: rem 

21 

DATA 

212,169,128,141 ,18,212,169 



: rem 

30 

DATA 

0,133,2,141 ,224,207,141 



;rem 

113 

DATA 

255,207,141 ,254,207,141 ,253 



j rem 

75 

DATA 

207,141 , 252,207,141 ,249,207 



; rem 

76 

DATA 

1 60,6,169,20,153,0,207 



: rem 

79 

DATA 

169,0,153,16,207,136,208 



: rem 

188 

DATA 

243, 169,251 ,141 ,251 ,207, 160 





: rem 

79 

50280 

DATA 

0,1 69, 4, 133,252,1 32,251 




: r em 

131 

50290 

DATA 

169,216,133,254,132,253,169 



i rem 

93 

503 00 

DATA 

1 60,160, 5, 145,251 ,160,10 




i rem 

167 

5031 0 

DATA 

1 45,251 ,160,15,145,251 ,160 




: rem 

19 

50320 

DATA 

20,145,251,160,25,145,251 




: rem 

224 

50330 

DATA 

160,30,145,251 ,160,35,145 




: rem 

226 

50340 

DATA 

251 ,165, 251 ,24,105,40,133 




; rem 

225 

50 3 50 

DATA 

251 , 144,2,230,252,201 ,232 




: rem 

21 8 

50360 

DATA 

208,211,169,1,160,10,145 




! rem 

177 

50370 

DATA 

253,169,4,160,5,145,253 




: rem 

143 

50330 

DATA 

169,7,160,1 5,145,253,169 




: rem 

202 

50390 

DATA 

14,160,20,145,253,169,8 




: rem 

141 

50400 

DATA 

160,25,145,253,169,13,160 




: rem 

232 

5041 0 

DATA 

30,145,253,169,3,160,35 




: rem 

133 

50420 

DATA 

145,253,165,253,24,105,40 




; rem 

231 

50430 

DATA 

1 33,253,144,2,230,254,201 




: rem 

221 

50440 

DATA 

232,208,199,96,-1 srem 

104 

504 50 

DATA 

173,141 ; rem 

117 

50460 

DATA 

2,201,1,208,3,76,49 srem 

190 

50470 

DATA 

234,230,2,165, 2, 201, 2: rem 

21 

50480 

DATA 

240, 3,76, 49, 234,169,0s rem 

47 

50490 

DATA 

1 33,2,169, 3,133,252,169 




s rem 

144 

50500 

DATA 

216,133, 251 ,160,45, 177,251 




: rem 

27 

50510 

DATA 

32,79,195,160,55,177,251 




:rem 

201 

50520 

DATA 

32,79,195, 160,65,177,251 




:rem 

203 

50530 

DATA 

32,79,195,160,75,177,251 




s rem 

205 

50540 

DATA 

32,79, 195,165,251 ,24,105 




s rem 

196 

50550 

DATA 

40,133,251,144,2,230,252 




s rem 

173 

50560 

DATA 

201 ,192,208,21 3,76,0,198 




s rem 

192 

50570 

DATA 

201 ,160,240,19,201 , 32,240 




s rem 

21 9 

50580 

DATA 

37,162,1,232,221 ,174,195 




: rem 

191 

50590 

DATA 

208,250, 202,189,174, 195,145 



s rem 

97 
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50600 DATA 251,96,152,56,233,40,168 

: rem 1 94 

50610 DATA 177,251,201,32,240,1,96 

s rem 1 31 

50620 DATA 152,24,105,40,168,169,227 

srem 241 

50630 DATA 145,251,96,165,252,201,3 

srem 188 

50640 DATA 240,22,152,56,233,40,168 

i rem 185 

50650 DATA 177,251,201,160,240,1,96 

; rem 185 

50660 DATA 152,24,105,40,168,169,99 

srem 204 

50670 DATA 145,251,96,152,24,105,120 

srem 236 

50680 DATA 168,177,251,201,100,240,1 

srem 230 

50690 DATA 96,152,56,233,120,168,169 

: rem 2 

50700 DATA 99,145,251,96,160,228,239 

: rem 2 

50710 DATA 249,226,120,119,99,32,32 

srem 194 

50720 DATA 100,111 ,1 21, 98, 248, 247, 227 

: rem 31 

50730 DATA -2,169,7,133,252 srem 47 

50740 DATA 169,32,133,251,160,170,177 

: rem 36 

50750 DATA 251 , 32, 47, 1 9B , 1 60 , 1 80 , 1 77 

: r^m 2 52 

50760 DATA 251,32,47,198,160,190,177 

srem 254 

50770 DATA 251,32,47,198,165,251,56 

srem 206 

50780 DATA 233,40,133,251,176,2,198 

: r em 195 

50790 DATA 252,201,56,208,220,76,160 

srem 240 

50800 DATA 1 98, 201 , HO, 240, 19, 201 , 32 

srem 227 

50810 DATA 240,37,162,1,232,221,142 

srem 173 

50820 DATA 198,208,250,202,189,142,198 

srem 39 

50830 DATA 145,251,96,152,24,105,40 

srem 187 

50840 DATA 168,177,251,201,32,240,1 

treni 134 

50850 DATA 96,152,56,233,40,168,169 

srem 209 

50860 DATA 228,145,251,96,165,251,201 

srem 41 

50870 DATA 32,240,22,152,24,105,40 

srem 125 

50880 DATA 168,177,251,201,160,240,1 

srem 238 

50890 DATA 96,152,56,233,40,168,169 

srem 21 3 

50900 DATA 100,145,251,96,152,56,233 

s rem 237 

50910 DATA 120,168,177,251,201,99,240 

srem 37 

50920 DATA 1,96,152,24,105,120,168 

: rem l 36 

50930 DATA 169,100,145,251,96,32,99 

srem 204 

50940 DATA 119,120,226,249,239,228,160 

s rem 92 

50950 DATA 160,227,247,248,98,121,111 

srem 42 


50960 DATA 100,32,173,0,220,72,41 

srem 73 

50970 DATA 15,201,15,240,8,169,129 

srem 144 

50980 DATA 141,4,212,76,183,198,169 

srem 213 

50990 DATA 128,141,4,212,104,41,16 

srem 132 

51000 DATA 205,255,207,240,48,141,255 

srem 24 

51010 DATA 207,201,16,208,24,169,2 

srem 126 

51020 DATA 141,15,195,169,1,141,252 

s rem ISi 

51030 DATA 198,141,229,200,169,0,141 

s rem 232 

51040 DATA 250 , 207, 141 ,224,207,76,239 

srett 32 

51050 DATA 198,169,1,141,15,195,16* 

srem 203 

51060 DATA 2,141,252,198,141,229,200 

srem 230 

51070 DATA 169,0,133,2,32,245,198 

srem 90 

51080 DATA 76,32,200,238,250,207,173 

srem 236 

51090 DATA 250,207,201,1,240,1,96 

srem 75 

51100 DATA 169,0,141,250,207,173,0 

srem 122 

51110 DATA 220,141,254,207,41,1,208 

srem 168 

51120 DATA 13,173,253,207,201,253,240 

srem 16 

51130 DATA 23,206,253,207,76,45,199 

s rem 1 97 

51140 DATA 173,254,207,41,2,208,10 

s rem 1 26 

51150 DATA 173,253,207,201,3,240,3 

srem 123 

51160 DATA 238,253,207,173,254,207,41 

s rem 35 

51170 DATA 8,208,13,173,252,207,201 

; r em 1 B 2 

51180 DATA 3,240,23, 230,252, 207,76 

srem 139 

51190 DATA 82,199,173,254,207,41,4 t 

srem 151 

51200 DATA 208,10,173,252,207,201,253 

s rem 1 5 

51210 DATA 240,3,206,252,207,173,254 

srem 228 

51220 DATA 207 , 4 1 , 3 , 201 , 3 , 208 , ! 6 ; rem 20 

51230 DATA 173,253,207,240,11,16,6 

: rem 128 

51240 DATA 238,253,207,76,107,199,206 

srem 46 

51250 DATA 253,207,173,254,207,41,12 

srem 233 

51260 DATA 201,12,208,16,173,252,207 

srem 226 

51270 DATA 240,11,16,6,238,252,207 

srem 133 

51280 DATA 76,132,199,206,252,207,174 

srem 46 

51290 DATA 249,207,208,32,174,240,207 

: rem 37 

51300 DATA 224,60,176,25,173,253,207 

srem 236 

51310 DATA 24,109,1,208,201,80,176 

srem 128 
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51320 

DATA 

5,169,244,76,191 ,199,201 




: rem 

202 

51330 

DATA 

244,144,27,169,80,76,191 




jrem 

202 

51340 

DATA 

1 99,173,253,207,24,109,1 




:rem 

193 

51 350 

DATA 

208,201 ,41 ,176,5,169,244 




;rem 

191 

51 360 

DATA 

76,191 ,199,201 ,244,144,2 




; rem 

196 

51370 

DATA 

1 69, 41 ,1 41 ,1 , 208,1 73,252 




S rem 

188 

51380 

DATA 

207,48,32,24,109,0,208 


51 390 


; rem 

87 

DATA 

1 41 ,240,207,173,249,207,105 



:rem 

82 

51400 

DATA 

0,141 ,249,207,201 ,1,208 




: rem 

120 

5141 0 

DATA 

42,173,240,207,201 ,55,144 




;rem 

227 

51420 

DATA 

35,32,155,200,76,4,200 




:rem 

75 

51430 

DATA 

24,109,0,208,141,240,207 




;rem 

174 

51440 

DATA 

173, 249,207,105,255,141 ,249 



: rem 

90 

51450 

DATA 

207,208,12,173,240,207,201 




: rem 

20 

51460 

DATA 

25,1 76,5,1 69,25, 1 41 ,240 




:rem 

143 

51470 

DATA 

207,1 73,240,207,1 41 ,0,208 




:rem 

230 

51 480 

DATA 

173,16,208,41,254,13,249 




s rem 

195 

51 490 

DATA 

207,1 41 , 1 6,208,1 73,31 ,208 




srem 

238 

51500 

DATA 

41 ,ì ,240,3,76,101 ,200:rem 

13 

51510 

DATA 

96,162,5,189, 119,4,201 




; rem 

95 

51 520 

DATA 

57,240,6,254, 1 19,4, 76 srem 

46 

51530 

DATA 

58,200,169,48,157,119,4 




s rem 

151 

51540 

DATA 

202,208,235,76,58,200,162 




srem 

238 

51550 

DATA 

5, 189,39,4,201 ,48, 240 f rem 

46 

51560 

DATA 

6, 222,39,4, 76, 222,200:rem 

36 

51570 

DATA 

169,57,157,39,4,202,208 




srem 

155 

51580 

DATA 

235,120,169,234,141 ,21 ,3 




: r em 

183 

51 590 

DATA 

169,49,141 ,20,3,88,169 




srem 

110 

51 600 

DATA 

255,133,2,76,222,200,0 




srem 

72 

51610 

DATA 

162,0,160,240,238,32,208 




: rem 

177 

51620 

DATA 

232, 20 8, 2 50, 20 0,20 8, 247, 1 69 



:rem 

81 

51630 

DATA 

0,141 ,32,208, 162,3,189 




:rem 

84 

51640 

DATA 

39,4,201 ,48, 240,4, 2 22: rem 

33 

51 650 

DATA 

39,4,96,169,57,157,39: rem 

71 

51660 

DATA 

4,202,208,237,162,5,169 




:rem 

144 

51670 

DATA 

48,157,39,4,202,208,250 




:rem 

147 

51 680 

DATA 

104,1 04,76, 81 , 200,160,15 




:rem 

181 

51 690 

DATA 

162,3,189,39,4,201 ,57:rem 

52 

51700 

DATA 

240,6, 254, 39, 4,76, 180; rem 

44 



51710 DATA 200,169,48,157,39,4,202 




: rem 

143 

51720 

DATA 

208,235,136,208,230,169,0 




: rem 

238 

51730 

DATA 

1 41,249,207,169,25,1 41,240 




:rem 

35 

51 740 

DATA 

207,1 69,148, 1 41 , 1 ,20 8,1 72 




: rem 

244 

51750 

DATA 

156,200,192,9,240,4,136 




srem 

139 

51760 

DATA 

140,1 56,200,173,5,4,201 




: rem 

127 

51770 

DATA 

160,208,5,169,227,141 ,5 




srem 

146 

51780 

DATA 

4,96,238,224,207, 173,224 




;rem 

203 

51790 

DATA 

207,201 ,1,240,3,76,124 




srem 

82 

51 800 

DATA 

201 ,169,0, 141 ,224,207,173 




srem 

229 

51810 

DATA 

27,21 2,201 ,7,176,25,168 




: r em 

141 

51820 

DATA 

185,0,207,201 ,20,208,8 




: rem 

80 

51830 

DATA 

1 69,1,153,16,207,76,16 




: rem 

97 

51840 

DATA 

201 , 201 ,255,208,5, 169,255 




; r em 

241 

51 850 

DATA 

153,16,207,160,6,185,0 




; rem 

89 

51 860 

DATA 

207,24, 121 ,16,207,153,0 




: rem 

130 

51 870 

DATA 

207,72,152,10,170,104,157 




; rem 

236 

51 880 

DATA 

1,208,136,208,235,160,6 




; rem 

142 

51 890 

DATA 

185,0,207,201 ,20,240,10 




; rem 

124 

51 900 

DATA 

201 ,255,240,6,136,208,242 




: rem 

232 

51910 

DATA 

76,66,201,169,0,153,16 




;rem 

94 

51920 

DATA 

207,76,52,201 ,173,30,208 




;rem 

187 

51930 

DATA 

41 ,1,240,51 ,162, 0,1 60; rem 

22 

51940 

DATA 

240,238,32,208,232,208,250 




srem 

31 

51 950 

DATA 

200,208,247,169,0,141 ,32 




srem 

186 

51960 

DATA 

208,162,3,1 89,39,4,201 




; rem 

98 

51970 

DATA 

48,240,6,222,39,4,76 ;rem 

3 

51 980 

DATA 

49,234,169,57,157,39,4 




; r em 

120 

51990 

DATA 

202,208,235,162,5,169,48 




: rem 

204 

52000 

DATA 

1 57,39,4,202,208,250,76 




: rem 

1 36 

5201 0 

DATA 

49,234,256 :rem 

13 
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il Corso di BASIC 
in meno di 6 mesi 


ideato dagli specialisti 
del Gruppo Editoriale Jackson 





è il corso che risponde oJtretutto alle 
esigenze di chi non ha tempo da perdere, 
perché; 





per tutti coloro 
che vogliono 
davvero “dialogare” 
col computer 


ABC 

Personal Computer 

tratta il BASIC in modo diverso, organico, 
comprensibile a tutti perchè nasce dalla 
grande esperienza e dalla capacitò 
divulgativa del Gruppo Editoriale Jackson 


La rapida diffusione dei computer nelle 
aziende, nelle scuote, nelle case ha reso 
ergente e indispensabile per molti 
imparare il linguaggio del calcolatore. Ci 
sono molti modi per tarlo. Il più nuovo, 
originale; rapido e divertente si chiama ... 


ABC 

Personal Computer 

l'opera creata per rispondere alle esigenze 
d* chi. per lavoro, studio, hobby vuole 
acquisire un'effettiva padronanza dei 
piccoli elaboratori per sfruttarne le 
immense, entusiasmanti possibilità. 


ABC 



Personal Computer 

è un'opera preziosa, 
comprensibile per I ragazzi, 
perché comincia proprio dalfabc 
dell’ informatica; 

Ideate per 1 professionisti, 
perchè rapida, esauriente* concreta; 
preziosa per gii appassionati 
perchè ricca di programmi già testati, di 
suggerimenti, di notizie sul mondo dei 
piccoli computer. 


EDITORIALE JACKSON 

noi rinformatica 
la conosciamo davvero 


Personal Compy fe[ 


24 appuntamenti in edicola per arricchire 
la biblioteca di casa con: 

2 volumi di Lezioni per complessive 
608 pagine 

1 volume di Computer-test 
7 Dizionario di Informatica di oltre 
208 pagine 

L'opera è elegantemente nlegata 
in similpelle. 

Centinaia di illustrazioni a colori, 
fato e disegni. 

Formato dei volumi cm, 21x28. 

Formato del Dizionario di informatica 
cm. 15x21. 


ABC 

Personal Computer 

svela i segreti del BASIC - il linguaggio 
fondamentale dei personal, home e 
microcomputer - e fornisce la chiave per 
programmare da soli. 


Abbonamento-risparmio 


Tagliando da Inviar* In busta chiù»* a: 

Gruppo Editoriali Jackton "ABC Personal Computar" 
irta Rotatimi. 12 - 20124 Milano 


SI. daafcJano aottoacrivara l'abbonamento risparmio ai 24 fascicoli 
di ABC Faraona! Computar e alle copertine dei 4 volumi dell'opera 
Tutto ai prezzo apode** di L 80 .000 invece di L 96 000 

Allego aria presente 

□ assegno non trasferibile di L 80 000 a voi intestato 

□ fotocopi* di versamento di L 80 000 sul ecp n. T 1666203 

□ fotocopia di veglia postele di L. 90 000 a voi intestato 

i t»*oco* dovTinnQ w**f+ *wii * 

CoflfKHn* 


t 



di D, Carmichael 

trad. ed adatt, di U. G, Barzaghi 


CJna delle tecniche dì animazione 
più frequentemente usate nei pro- 
grammi BASIC consiste nelTutlllz- 
zare più istruzioni PR1NT per far 
comparire caratteri sullo schermo. 
Questo articolo mostra come una 
routine in linguaggio macchina di 
semplice ut] tizzo possa aumentare 
te velocità del procedimento, e 
possa addirittura rendere più rapi- 
da la risposta delta vostra tastiera 
al di fuori dei programmi. 


S e scrìvete giochi o programmi che 
utilizzano la tastiera per muovere 
oggetti sullo schermo, la mancanza di 
velocità dovrebbe essere la vostra 
maggior fonie di problemi. Tuttavia, 
se utilizzate una istruzione GEI per 
muovere gli oggetti, c'è un modo per 
aumentare di molto la velocità. Ciò si 
può ottenere manipolando ì “controlli** 
della tastiera all'interno dello stesso 

vie. 

[ controlli delia tastiera - Come 
funzionano 

Innanzi tutto, per assicurarvi che il vo- 
stro VIC sia in condizioni standard per 
questa dimostrazione, dovreste spe- 
gnerlo e riaccenderlo per azzerarlo. 
Premete la barra spaziatrice, e conti- 
nuate a tenerla premuta. IL cursore sì 
muoverà attraverso lo schermo perché 
il "sistema operativo ' — un program- 
ma di controllo interno del calcolatore 
— dà istruzione al VIC di ripetere 11 
procedimento, anche se voi avete pre- 
muto la spaziatrice una sola volta. Ora 
premete un qualsiasi tasto alfabetico, 
e continuate a tenerlo abbassato. Sup- 
poniamo (e, d'ora in avanti, lo faremo 
anche negli esempi successivi ) che voi 
abbiate abbassato il tasto della “A". 
Anche se voi continuale a tener io pre- 
muto. la "A" non verrà ripetuta sullo 
schermo. Ciò perché gli unici tasti del 
VIC per i quali la ripetizione Sia pro- 
grammata sono la barra spaziatrice. 



INSERT/DELETE, e ì due tasti di con- 
trollo dei cursori. 

Pulite io schermo premendo SHIFT- 
CLRmOME, quindi battete PGKE- 
650.128. La cella di memoria segnala 
al sistema operativo quali tasti ripete- 
re. Normalmente è inizializzata a 0, il 
che permette la soia ripetizione dei ta 
sti suddetti. Un valore di 1 28 permette 
la ripetizione di tutti i tasti. In questo 
caso, se premeste "A“. si ripeterebbe 
come la barra spaziatrice. Lasciate (tra- 
mite una istruzione PO KB) la celia 650 


inizializzata a 128 t per ora. 

Come aumentare la velocità dì 
ripetizione 

Premeteetenete abbassato il tasto del- 
la "A" qualche volta, noterete come vi 
sia una pausa di una frazione di secon- 
do, prima che cominci la ripetizione 
del caratteri. La durata di questa 
è controllata dalla locazione di 
ria 652. che non è altro 
tore'\ 

Quando voi premete il 
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Sta cella contiene un valore numerico 
di 15. Quindi comincia un conto alla 
rovescia, con passo unitario, finché 
non raggiunge lo zero, la qual cosa se- 
gnala al calcolatore di iniziare il proce- 
dimento di ripetizione. 

Per abbreviare la pausa, potreste pen- 
sare di inserire con una istruzione di 
POKE un numero minore dì 15 nella 
locazione di memoria 652, Ma a causa 
del modo in cui il sistema operativo 
del VIC lavora ("correndo" attraverso il 
calcolatore 60 volte al secondo ri- 
iniziai izzando diversi parametri ecc,). 
la locazione 652 verrebbe rapidamente 
cambiata di nuovo in 15, Tuttavia, po- 
tete utilizzare un programma che man- 
tenga questa locazione ìnizializzata a 
0. evitando così fa pausa prima della ri- 
petizione. Inserite in memoria il pro- 
gramma l — un programma BASIC 
che ha funzioni di "caricatore", che 
provvede, cioè, ad inserire tramite 
istruzioni PQKE un breve programma 
in linguaggio macchina nel buffer del 
registratore {un'area di memoria utiliz- 
zabile). Verificatelo attentamente, 
quindi mandatelo in esecuzione bat- 
tendo RUM 59990. Ora il programma 
in linguaggio macchina è inserito in 
memoria e pronto per l'uso. Battete 
SYS828 per farlo partire. 

Ora, se premete il tasto della "A", no- 
terete che la ripetezione comincia imme- 
diatamente. Con la locazione di me- 
moria 652 costantemente ri- 
inizializzata a 0, non c’è conto alla ro- 
vescia, quindi non c’è nemmeno alcu- 
na pausa. 

Per inciso, se commettete errori 
nell'lnserire uno dei programmi in lin- 
guaggio macchina e siete costretti a 
spegnere il VIC ed a riaccenderlo per 
riprendere, ricordatevi di ripetere 
l'istruzione POKE 650, 128 prima dì 
proseguire in questo articolo. 

Un'altra locazione di memoria che vi 
aulerà a velocizzare i vostri programmi 
è l'indirizzo di memoria 651. Anche 


questa cella è un "contatore", fissa il ri- 
tardo di tempo tra l’uscita su video di 
ciascun carattere in caso di ripetizione. 
La cella 651 usa la stessa tecnica di 
conto alla rovescia della 652, fatta ec- 
cezione per il fatto che comincia da 4 
invece che da 15. Durante le ripetizio- 
ni. conta alla rovescia fino a 1, stampa 
il carattere, e quindi conta di nuovo 
all'indletro. In altre parole, conta ‘4 3 
2- l-PRIMT il carattere", ‘ 4-3-2- 1 -PRIMI 
il carattere", ecc. 

Come per la locazione 652. potete ab- 
breviare il ritardo di tmepo inserendo 
con una istruzione POKE un valore in- 
feriore a 4 nella locazione 651 . Il siste- 
ma operativo prende in esame anche 
la cella 651. e la ri-inizializza a 4 ogni 
sessantesimo dì secondo. Ma, ancora 
una volta, possiamo caricare un pro- 
gramma che aggira Tostatolo. 

Battete il programma 2, che è un'altro 
programma in linguaggio macchina. 
Questo programma modifica entram- 
be le locazioni di memoria 65 I e 652 e 
velocizza l'intero procedimento di ri- 
petizione. Verificate attentamente il 
vostro lavoro dì copiatura, quindi bat- 
tete RUM59997 per inserire il program- 
ma in linguaggio macchina in memo- 
ria. Battete SYS828 per farlo partire: 
ora premete la lettera "A” e potrete no- 
tare come la ripetizione sia molto più 
rapida. Paragonatela alla velocità nor- 
male premendo RC1TVSTOP e RESTO- 
RE contemporaneamente (per inter- 
rompere il programma in linguaggio 
macchinal e, quindi, premendo nuova- 
mente la "A". 

Il programma 2 potrà essere aggiunto 
ai vostri programmi BASIC e contri- 
buirà ad aumentarne la velocità. 
Tuttavia, bisogna far attenzione a due 
cose circa questo programma. La pri- 
ma è che, dopo che il programma BA- 
SIC iniziale è stato mandato in esecu- 
zione, ed il programma in linguaggio 
macchina è stato felicemente inserito 
in memoria dalle istruzioni POKE, po 


tele cancellare le righe 59997-59999, 
Esse non sono necessarie. La seconda 
è che, a causa del fatto che il program 
ma in linguaggio macchina utilizza il 
buffer del registratore, non potete uti- 
lizzare il salvataggio su nastro mentre 
il programma in linguaggio macchina 
è in esecuzione. Premete RfJM/STOP 
RESTOSE per disabilitarlo prima di 
usare il registratore. 

Il programma 3 è opzionale, È un pro- 
gramma che utilizza la istruzione GET 
per muovere il carattere "pallina 
piena" (CHRS(8l)) sullo schermo. È 
stato scritto per utilizzare la routine in 
linguaggio macchina che permette di 
aumentare la velocità. Potete aggiun- 
gere anch'esso ai vostri programmi 
BASIC o costruirli attorno ad esso. 

Come usare il programma 3 

Battete accuratamente i programmi 2 
e 3. Se volete risparmiare memoria 
cambiando i numeri di riga del pro- 
gramma 3, potete farlo, ma ricordatevi 
di cambiare i GOTO corrispondenti, 
ecc. Se volete cambiare il carattere che 
viene spostato lungo lo schermo, esso 
è controllato dalla variabile H in riga 
6000 (fate riferimento al "Vie user's 
manuali per sapere il numero dì PO- 
KE corrispondente al carattere voluto). 
Per eseguire il programma, prima bat 
tele RUM59997 per inserire il program- 
ma in linguaggio macchina di suppor 
lo in memoria, quindi battete RUM 
60000 per eseguire il programma BA 
SIC. 3 tasti seguenti controllano gli spo- 
spostamenti del carattere: 

— W - verso sinistra 
-— R - verso destra -* 

— P - verso l’alto T 

— , - verso il basso i 

La riga 60050 è opzionale. Senza di es- 
sa, il movimento della pallina sarà leg- 
germente più veloce, ma la pallina 
lampeggerà. la qual cosa potreste tro* 
vare più o meno gradevole. 


Programma 1 


59998 FORA-828TD848 : READB : POKE A, B : NEXT : EN 
D :rem 160 

599 99 DATA 120 ,169,73,141,20,3,169,3,141,2 
1,3,88,96,169, 0,141, 140,2,76,191,23 
4 :rem 23 

Programma 2 

59997 FORA 3 82 BTQS53 : READ B : POKE A , B : NEXT : EN 

0 : rem 155 

59998 DATA 120, 169,73,141,20, 3, 169, 3 , 141,2 

1,3, 88, 96, 169, 1,141, 139, 2, 169, 0>141 
, 140,2,76 ; rem 156 

59999 DATA 191,234 : rem 147 

Programma 3 

59997 FORA* 8 28TQ8 53 : READB : POKE A , B : NEXT : EN 
D : rem 155 


59998 DATA120, 169,73,141,20,3,169,3,141,2 

1,3,88,96,169,1,141,139,2,169,0,141 
,140,2,76 : rem 156 

59999 DATAI 91, 234 : rem 147 

60000 A=7680;B=38400:C=8185:E-A:F-3B905:G 

*B:B = 81 : 1*32 :POKE650, 128: SYSB28:PRI 
NT” {CLR}":D*1 :rem 209 

60010 GETAS : I F A$ = " R W THEND = 1 ; G0TO6 0 060 

:rem 141 

60020 IFA$* N W*'THEND = - 1 : GOTQ60Q60 : rem 65 
600 30 IFA5 = 11 * *'THEtJD = 2 2 :GOTO60060 : rem 27 
6004 0 I F A5 * 11 P *' TREND* - 2 2 : G0TO6 0 060 

:rem 111 

60050 IFD*OTHEN6Q010 : rem 97 

60 060 POKEA, I : A- A+D : B=B+D : POKEA , H : POKEB , 6 
: D = 0 : rem 201 

60070 IFA<ETHENA=C: B-F: GOTG6 0060; rem 172 
600 9 0 T FA>CTHENA=E : B=G : GOTO60 060 : rem 176 

60090 GOTG6QQ 1 0 : rem 47 
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di D. W. Martin 

trad. ed adatt. di (J. Barzaghi 



1 tosti di controllo cursore del vostro 
C64 vi danno già alcune delle più po- 
tenti funzioni di schermo disponibili 
per un Home computer* ma questo 
programma di utilità pratica ne ag- 
giunge altre: cancella lo schermo al di 
sotto del cursore, lo cancella al di so- 
pra, e posiziona il cursore all'angolo 
inferiore sinistro dello schermo, Il tut- 
to con la velocità del linguaggio mac* 
china, 

Mei corso dela revisione di lunghi pro- 
grammi o facendo ripetuti calcoli nu- 
merici in modo Immediato (cioè al di 
fuori da un programma BASIC) è spes- 
so utile poter cancellare una parte del- 
lo schermo lasciando la rimanente in- 
tatta. È anche utile* a volte* poter posi- 
zionare il cursore nell'angolo Inferiore 
sinistro dello schermo invece che nella 
nomale posizione superiore sinistra ot- 
tenibile premendo il tasto HOME. 
Benché la Commodore abbia Inserito 
eccellenti funzioni di schermo nel C64 t 
"Doti, Video 64” aggiunge una mag- 
gior flessibilità fornendovi altri tre tasti 
di controllo cursore. Una tecnica parti- 
colare permette a Doti* Vìdeo di fun- 
zionare anche quando state battendo o 
mentre è in esecuzione un altro pro- 
gramma. Dal momento che ìl pro- 
gramma è Interamente scritto in lin- 
guaggio macchina* non occupa nessu- 
na parte della memoria normalmente 
usata per la programmazione BASIC* 
Le nuove funzioni di controllo del cur- 
sore sono assegnate a tre del tasti di 
funzione del C64. Gli assegnamenti so- 
no I seguenti: 

FI Cancella lo schermo fino al margi- 
ne superiore, cominciando con la riga 
contenente 11 cursore. 

F3 Cancella lo schermo fino al margi- 
ne inferiore, a partire dalla lìnea conte- 
nente Il cursore. 

F5 Pone II cursore nel rango lo inferio- 
re sinistro dello schermo. 

Come opera 11 "Dott, Video 
64" 

Ogni sessantesimo di secondo il vostro 
C64 si arresta* qualsiasi cosa stia fa- 
cendo, e passa un po' dì tempo a leg- 
gere la tastiera ed a sbrigare altri com- 
piti di economia domestica. Queste so- 


ste vengono chiamate "interruzioni" o 
"interrupt ri f ed il programma In lin- 
guaggio macchina in esecuzione du- 
rante le interruzioni (segnale IRQ)* va a 
guardare in una coppia di locazioni di 
memoria per trovare l'Indirizzo di par- 
tenza (chiamato vettore IRQ) del sotto- 
programma di servizio delle interruzio- 
ni che deve essere eseguito. Nel C64, Il 
vettore IRQ è contenuto nelle locazioni 
788 e 789, che identificano normal- 
mente {'indirizzo 59953, l'Inizio del 
sottoprogramma IRQ nella ROM (me- 
moria a sola lettura e perciò inalterabi- 
le) standard. Tuttavia, poiché II vettore 
IRQ é memorizzato nella memoria ad 
accesso casuale (RAM), che è modifi- 
cabile. possiamo sostituire lindi ri zzo 
del nostro personale sottoprogramma 
in linguaggio macchina ed aggiunger- 
lo alla normale routine di servìzio deile 
interruzioni.^ 

Come tutte le routine attivate dalle In- 
terruzioni * Dott. Video 64 viene ese- 
guito finché non ri-inizìalizzate il vo- 


stro calcolatore (premendo RtlN/STOP 
e RESTORE contemporaneamente, ad 
esemplo)* Non viene disattivato pre- 
mendo il solo tasto STOP. Dopo aver 
ri-in E zia li zzato, potete riattivare 1 nuovi 
tasti dì gestione dello schermo batten- 
do SYS49I52. 

Come Inferire 11 programma 

Dott. Video è un programmo in lin- 
guaggio macchina che utilizza un cari- 
catore BASIC per Inserire tramite istru- 
zioni POKE ì dati in memoria* e lancia- 
re la istruzione SYS che attiva il pro- 
gramma* Una somma di controllo vie- 
ne calcolata In modo da aiutarvi ad 
Identificare errori di battitura eventuali 
nelle istruzioni DATA ma, dal momen- 
to che il programma caricatore si can- 
cella da sé (con una istruzione NEW) In 
modo da non intralciare l'area di me- 
moria del BASIC, dovete badare a regi- 
strarne una copia prima di mandarlo in 
esecuzione con una istruzione RUN per 
la prima volta. 


Dott-Vldeo 64200 

FORI-0TO148 

: rem 

111 

210 

READJ : POKB49152+I , J:X“X+J:NEXTI 




irei 

175 

230 

I FX< > 1 7 5 2 4THENPRI NT" ERRORE NELLE 

1STR 


UZIONI DATA" ; STOP 

: rem 

242 

240 

SYS49152 :NEW 

:rem 

190 

300 

DATAI 20 , 169* 13,141,20, 3,169, 192,141*2 


1,3,88,96,165,197,41 

: rem 

236 

310 

DATAI 2 7 ,201,4,208,27,169, 

0,133,25 

,169 


,4,133,26,216,24,165 

:rem 

226 

320 

DATA 2 09, 105, 40, 133,27,165 

,210,133 

f 28# 


144,2,230,28,24,144,46 

;rem 

59 

330 

DATA165 ,197,41,127,201,5, 

208,19,165,2 


09,133,25,165,210,133,26 

:rem 

175 

340 

DATA169, 231, 133,27,169,7, 

133,28,24,14 


4,19,201,6,208,67,169 

: rem 

44 

350 

DATAI 92 ,133,209,169,7,133 

,210,169 

, 24 , 


133,214,24,144,44,216,56 

;rera 

180 

360 

DATA165,27,229, 25, 133,29, 

165,28,229,2 


6,133,30,169,32,166,30 

: rem 

92 

370 

DATA240 ,12,160, 0,145,25, 200, 208, 251 ,2 


30,26,202,208,246,166,29 

: rem 

156 

380 

DATA240, 8,160,0,145,25,200,202,208,25 


0,169,0,133,211,169,32 

: rem 

54 

390 

DATA133, 197,76,49, 234 

: rem 

17 
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C64 

Sound Tester 


di R.V, Picard 

trad. ad adatL di M, Crlatulb Grlzzl 


L e capacità sonore del C64 superano 
ampiamente le possibilità dì tutti i 
precedenti microcomputer. Prima 
del l'avvento del C64, la possibilità di 
scegliere forma d'onda, attack/decay e 
susta In/release di un suono esistevano 
solo per 1 sintetizzatori sonori. D'altra 
parte» capire e regolare tutti 1 vari para- 
metri di un suono può creare perplessi* 
tà sia programmatori principianti che 
a quelli più esperti. 

Questo programma permette di fare 
esperimenti con tutti questi parametri» 
ascoltare II risultato ed even tua I mente. 


modificare qualche regolazione del 
suono. 

Si possono esplorare tutte le otto otta* 
ve ed il generatore di rumore, ed In 
qualsiasi momento si possono control* 
lare I parametri dì regolazione usati 
prima di settame degli altri. 
Eseguendo 11 programma, apparirà un 
elenco del valori correnti di rego lezio* 
ne, con un cursore in prossimità del 
primo. Se si desidera modificare il va- 
lo re di quella linea, basta digitare II 
nuovo valore seguito dal RETURN; 
mentre se non lo si desidera modifica* 


re basta premere soltanto ii RETCJRR 
Le lettere T» 'S' e *P* si riferiscono alle 
forme d'onda rispettivamente triango- 
lare» a dente di sega e pulsante. !fT si 
riferisce al generatore di rumore» e ’Q' 
provoca l'uscita dal programma. Ogni 
volta che si desidera controllare I para- 
metri basta battere ‘D\ 

Dopo che sia stato immesso l'ultimo 
valore» verrà generato un suono para- 
metrizzato nel valori dati» dopo II quale 
Il programma riprenderà da capo. 


C64 Sound Tester 

5 DIMSO {16,8) tre® 205 

10 HF» 54 2 73* LF- 54 2 7 2 1 AD • 54 2 7 7 : SE" 54 2 7 8 : W* 
54276 :V-54296:HP-542753LP-54274 

:raa 69 

15 FORI - ITOfi s A ( X ) - 0 s HEXT : M$ ■ " S " ire® 99 
20 PORO-ITO Bs FORM- 1T016 1 RMDfiO ( R r O) :NEXT; 

NEXT : rem 204 

25 FORN**lT08:READD(N) tNEXT : rem 151 

100 PRINT" {CLR ) " ;CHR$ ( 18) J "REGOLAZIONE PO 
LSB SOLO CON ONDA PULSANTE" ;CHRS ( 146 ) 

; rata 5 

102 PRINT tram 32 

110 PRINT" FORMA D* ONDA( 3 SPAZ I } (T r S , P , N 
■ )* - * ;W$ s rem 114 

112 PRINT" VOLUME { 13 SPAZI}(1-15) *";A(1) 

: rem 141 

114 PRINT"OTTAVA( 14 SPAZI) (1-8) *">A(2) 

:rem 69 

116 FRI NT"REGOLA2 * ATT AC K { 5 SPAZI ) (0-15) 
A( 3) : rem 180 

118 PRINT" REGOL A Z . DEC AY { 6 SPAZI} (0-15) - 
"?A(4) tram 101 

120 PRI NT" REGOLAZ . SUSTA I N { 4 SPAZI } (0-15) 
-■?A(5) :rem 32 

122 PRINT"REGOLAZ.RELEASE( 4 SPAZI) (0-15) 
-"|A(6) tram 253 

124 PRINT" REGOLAZ .HIGH PULSE (0-15) -";A( 
7} tram 16B 

126 PR I NT "REGOLAI. LOW POLSE (0-255) *";A( 
8) srem 179 

130 PRINT" (HOME} *j "{ 3 GIU')"? tram 101 

140 FRINTTAB (33) j " 7" ? : GOSUB500 : IFZ5-"D"TH 
EN600 ; rem 201 



150 

IFZS“"Q"THENPRI!Tr" (CLR} " 

: END : rata 

25 

155 

IFZSOCHRS ( 13) THENWS-Z5 

: raffi 

61 

160 

PORO- ITO 6 

s rem 

20 

170 

PRIHTTAB ( 33} ; ■?■ f :GOSOBSOO : IFZSOCHRS 


(13)THEHA(0)-VAL(ZS) 

s rem 

113 

1B0 

HEXT 

:rem 

2l6 

190 

IPM$O"P"THEV230 

: rem 

118 

200 

FORO-7TO8 

: rem 

23 

210 

PRI NTTAB (33) J "?* J : OOSUB500: IFZS< >CKR$ 


( 13) THBNA (0) -VAL ( ZS ) 

i ran 

10B 

220 

HEXT 

i rem 

211 

230 

POKEV , A ( 1 ) 

:rem 

9 
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240 

POKEAD , 1 6 *A ( 3 ) +A ( 4 ) SPOKZSR, 

16*À(5)+A< 


6) 

tram 

66 

250 

I FWS - "T* THBHPOKEW , 17 

: reco 

191 

260 

IFW$«"S*THENPOKEW,33 

: rena 

189 

270 

IFW$-"F"THENPOKEW,65!POKBHF,A(7) : PO KB 


LP,A{8) 

tram 

177 

280 

I F WS ""N" THENPOKEW, 129 

s rem 

240 

300 

0*0 

s rem 

79 

310 

F0RI-1T015STEP2:P0KEHF,S0(I 

,A(2) ) : POR 


ELF, 80(1+1, A(2) ) : O-O+l: FORM 

-ITOD(O) 



team 

124 

311 

NSXT 

tram 

212 

315 

POKEHF , 0 : POKELF , 0 : NEXT : POKEW , 0 1 POKEAD 


, 0 ; POKBSR , 0 : POKEHP, 0 : POKSLP 

,Q 




: rem 

16 

320 

OOTOIOO 

: rem 

95 

500 


i rem 

14S 

510 

GBTY$ : PRINTCHRS (18) } " * |CHR$ ( 146) | IFO 


RI -1T025:NEXT: PRINTCHRS (157) j* "j 




tram 

34 

515 

PRINTCHRS (157) ) sFORI-lT025lNBXT:IFY$« 


"■THEN510 

tram 

57 

520 

PRINTYS ; 

: rem 

220 

530 

IFYS *CHR$ (13) THENIFLEN ( Z 8 ) - 

0THEN&$ 

i-CH 


R8(13> 

i rem 

16 

540 

IFYS -CHRS (13) THENRETORN 

: rem 

167 

550 

ZS-SS+YSs GOTO 510 

z rem 

132 


600 PRINT" (CLR) " : rem 2S0 

610 PRINTlPRINT"ATTACK/DBCAY{ 4 SFASI }■" ; 

16*A(3) +A { 4) t e «tu 59 

620 PRINT" SOSTAI N/RELEASE ■") 16*A(5)+A(6) 

: rem 131 

630 PRINTlPRINTsPRINT'PREMI OH TASTO PER 

CONTINUARE" ; : rem 189 

640 GSTYS tIFYS s ""THEN640 :rem 135 

650 GOTOIOO tran 101 

1000 DATAI, 155,1, 90, 1,110, 1,155, 1,90, 1,11 
0, 1,15.5 fi, 205 tram 85 

1010 DATA3, 54, 2, 179, 2, 220, 3, 54, 2, 179, 2, 22 
0,3,54,3,155 :emb 68 

1020 DATA6, 108, 5, 103, 5, 185, 6, 108, 5, 103, 5, 
185,6,108,7,53 :r«m 181 

1030 DATA12, 216, 10, 205, 11, 114, 12, 2*6,10, 2 
05,11,114,12,216,14,107 :r*n 67 

1040 DATA25, 177, 21, 154, 22, 227, 25, 177, 21,1 
54,22,227,25,177,28,214 ìe«b 126 

1050 DATASI, 97, 43, 52, 45, 198, 51,97,43,52,4 
5,198,51,97,57,172 , :rra 174 

1060 DATA102, 194, 86, 105,91, 140, 102, 194, 86 
,105,91,140,102,194,115,88 tcmn. 21 
1070 DATA205, 133, 172, 210,183,25, 205, 133,1 
72,210,183,25,205,133,230,176 

SEM) 147 

1080 DATA500, 250, 250, 250, 250, 250, 250, 1000 

; rem 247 


Yesterday 


Ecco un altro arrangiamento di un 
"classico" per il Commodore 64 ed II 
Music Editor pubblicato sul primo nume* 
ro della rivista, 

Siesta volta si trotta però di un "classi- 
co" degli anni ?(h la bellissima "Yester- 


day" del Beatles, 

Ricordate tuttavia che lo scopo princi- 
pale di questa rubrica 6 quello di stimo- 
lare la vostra fantasia e creatività a spe- 
rimentare le capacità musicale del 
Commodore 64* 


Utilizzate quindi TEtittor non solo per 
"suonare" gli spartiti pubblicati, ma an- 
che per scrivere I vostri spartiti e per 
creare delle sonorità originali, 
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047 

24 

0 5 

B 4 

G 2 

08? 

16 

F 

5 

fi #4 

fì#2 

127 

08 

C#6 

C#3- 

fi 2 

04S 

08 

D 5 

n 5 


088 

08 

fi 

5 

c 

5 

F 2 

128 

08 

B 6 

33 

5 


049 

16 

F 5 

fi# 4 

fi#2 

089 

08 

fi 

5 

0 

5 

F 2 

129 

0S 

E 6 

E 

5 


050 

08 

fi 5 

C 5 

F 2 

090 

16 

fi 

3 

c 

5 

F 2 

130 

08 

F 6 

F 

5 


05 1 

0S 

R 5 

C 5 

F 2 

091 

16 





C 3 

131 

12 

E 6 

E 

5 

B 3 

052 

16 

fi 5 

C 5 

F 2 

S82 

32 

fì 

5 

fi 

4 

E 3 

132 

84 

B 6 

B 

5 


053 

16 



C 3 

@93 

32 

fi 

5 

fì 

4 

C#3 

133 

32 

B 6 

B 

5 


054 

68 

G 5 

C 5 

F 2 

094 

16 

D 

6 

B 

5 

B 3 

134 

16 




C 3 

055 

08 

F 5 



095 

16 

E 

6 

E 

5 

C 3 

135 

32 

*** 

B 

5 

R#2 

056 

32 

F 5 



096 

16 

F 

6 

F 

5 

fi#2 

136 

08 

B 6 




05? 

16 



F 3 

097 

08 

E 

6 

E 

s 

R 2 

137 

08 

B 6 




058 

32 


B 4 

E 3 

098 

08 

B 

6 

B 

5 


138 

88 

C 6 

E 

5 

C 3 

059 

08 

fi 5 

fi 4 


099 

24 

E 

6 

E 

5 

G 2 

139 

88 

fì#5 




0È8 

88 

B 5 

B 4 


1.00 

08 

D 

6 




140 

08 

R 5 




@6i 

03 

C#6 

C#5 

fi 2 

101 

16 

C 

6 

E 

5 

C 3 

141 

08 

G 5 




062 

08 

X) 6 

B 5 


102 

16 

B 

6 




142 

16 

fi#5 

F 

5 

F 3 

06> : 

68 

E 6 

E 5 


103 

32 

fi 

5 

F 

5 

F 2 

143 

08 

fì 5 




064 

08 

F 6 

F 5 


104 

32 





F 3 

144 

08 

fì 5 




065 

12 

E 6 

E 5 

D 3 

105 

32 

fi 

5 

fi 

4 

B 2 

145 

16 

fì 5 



F 3 

066 

04 

P 6 

B 5 


106 

32 

fi 

5 

fi 

4 

C#3 

146 

16 

G 5 

C 

5 

E 3 

667 

16 

P 6 

B 5 


107 

16 

B 

6 

B 

5 

B 3 

147 

16 

F 5 

B 

□ 

D 3 

068 

16 



D 3 

188 

16 

E 

6 

E 


C 3 

148 

08 

fì 5 

c 

5 


069 

16 



C 3 

109 

16 

F 

6 

F 

5 

fì#2 

149 

0S 

G 5 

B 

4 


070 

32 


r 5 

P#2 

110 

03 

E 

6 

E 

5 

fì 2 

158 

24 

G 5 

B 

4 

G 2 

071 

08 

.0 6 



111 

08 

B 

6 




151 

08 

D 5 

B 

5 


0?2 

88 

B 6 



112 

24 

E 

6 

E 

5 

G 2 

152 

16 

F 5 

B 

5 

fì#2 

073 

08 

C 6 

E 5 

C 3 

113 

88 

n 

6 




153 

08 

fì 5 

C 
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di M* CrUtoib Grizzl 


Borsa per C64 


Dopo H grande successo riscontra- 
to per "Melopoll", la simulazione 
del famoso Monopoli su Apple II» 
Iniziano ad apparire I primi giochi 
"di società" computerizzati anche 
per 11 C64. "Borsa” è un simpati- 
cissimo programma che permette 
di passare piacevoli serate Iti com- 
pagnia, stimolando l'Intelligenza 
e*,* Il senso degli affari. 


P ossono partecipare al gioco da 
due ad otto giocatori, a ciascuno 
del quali viene assegnata Inizialmente 
la dotazione di una carta di credito, un 
capitale di 1 00.000 dollari, ed un tota- 
le di cinque azioni estratte a sorte. Il 
percorso del gioco è formato da qua- 
ranta diverse caselle, ognuna rappre- 
sentante differenti situazioni del mer- 
cato azionarlo, mentre la tecnica del 
gioco riflette abbastanza realmente le 
operazioni tipiche del mondo della 
borsa. 

Acquisto e vendita di grossi pacchetti 
azionari, rialzo o ribasso improvviso 
delle quotazioni, la scalata ai pacchetti 
azionari di maggioranza. Informazioni 
e previsioni circa i successi o insucces- 
si delle varie Industrie, il fallimento 
delle aziende con le sue conseguenze, 
sono tutte cose con le quali si deve fare 
i conti per riuscire ad incrementare il 
proprio capitale Uno ad un milione di 
dollari, quindici azioni ed una carta di 
credito. Il primo giocatore che rag- 


GIOCO 


BORSA 

mt IL ■ÉfCL*«*TG («/*> ? 


giunge questa meta è dichiarato vinci- 
tore. ed è sicuro il suo fiuto negli affari. 
Il gioco si sviluppa in molteplici scher- 
mate e prospetti, nei quali vengono 
mostrate la propria situazione finanzia- 
ria, Il listino dì borsa, casella in cui ci si 
trova, eie. Per creare anche una com- 
ponente di casualità nel gioco, è previ- 
sto Il lancio del dadi (dadi elettronici, 
naturalmente) e 20 tipi diversi di telex 
che ogni tanto vengono ricevuti dal 
singoli giocatori, recando buone o cat- 
tive notizie da parte degli agenti di bor- 
sa che sono stati sguinzagliati. 

Il programma è veramente completo e, 
a differenza di altri giochi per compu- 
ter, non è dominato dalla casualità: il 
giocatore è sempre dotato della possi- 
bilità di scelta tra lancio dei dadi ed 



utilizzo di una tessera della quale è 
precedentemente entrato In possesso. 
Dopo anni di totale dominio di alieni e 
marzienlni nel settore dei giochi per 
computer, stiamo Finalmente assisten- 
do alla nascita di giochi un po' meno 
Istintivi ed un po' più intelligenti: spe- 
riamo al continui su questa strada. 


Borea per C64 cod. CCAMC01 
è In vendita presso: 
TECHNOCLUB 
Via Ro sellini, 12 
20124 Milano 
a L, 48.000, 
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LIGHT PEN 
FLEXIDRAW PER 
COMMODORE 64 


• La GSC Italiana distribuisce una nuova penna ottica 
per il Commodore 64, 

• La penna Flexidraw è un sistema deferente e con 
concetti nuovi rispetto alle lìght-pen già presenti 
sul mercato. 

• Flexidraw System è uno strumento sviluppato per 
applicazioni professionali, 

• Può essere usato da programmatori ^disegnatori , 
artisti e per tutte le altre necessiti dove è richiesta 
una periferica d'ingresso con eccellente qualità 

in alta risoluzione grafica. 

• Flexidraw è un package completo con un ricco 
corredo di software versatile, 

• Sul dischetto master di base sono contenuti 
numerosi programmi : la stesura di schemi elettrici ( 
disegni di architettura , una espressione matematica r 
l'alfabeto greco , tutti ì simboli musicali , 

un programma dimostrativo del sintetizzatore 
musicale ed un programma che simula la tastiera 
di un pianoforte. 

• Sono contenuti inoltre quattro spettacolari 
esempi dì grafica. 



Cod, SM/31 00 12 DISTRIBUITA DALLA GBC 



Presente e futuro 

dell'Intelligenza 

artificiale 
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Software 64 

practical programs for 
thè Commodore 64 

(Programmi pratici per fi 
Commodore 64) 

di Oweik Bishop 

Tredici programmi per il C64 fonda* 
mentalemente Ispirati ad un uso de! 
computer come organizzatore "casa- 
lingo” del propri dall, scelte ed affari. 
Non mancano però anche programmi 
di “relax", quali "Sounds Incredibile" 
che fornisce una delle migliori dimo- 
strazioni delle potenziai itè musicali 
sessa ntaquattresche. o "GottitJ" che 
trasforma 11 computer In un inflessibile 
esaminatore della vostra cultura gene- 
rale* Un altro programma particolar- 
mente utile per II vostro portafogli è 
"Phone Cali Costar”* che permette di 


SOFTWARE 64 

Practical programs far 
thè Commodore 64 

n IONI GÀU ÓDS JFS ni* 

SOUNDS JsjCPEDeU? 

ax ouvrA ni t à tttt' ; . : ex : punttes 
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OWFN BISHOP 


calcolare in tempo reale il costo delle 
vostre telefonate (vedrete che dopo 
averlo eseguito vi tratterrete meno ai 
telefono) e controllare le bollette che 
vi arrivano. GII altri programmi, come 
già accennato, sono Indirizzati ad un 
uso "Intelligente” del computer: data 
base per la gestione completa di Infor- 
mazioni, controllo degli stock per la 
gestione di un magazzino, analisi di 
mercato per previsioni sulle vendite o 
sull’andamento di un particolare pro- 
dotto, etc. 

Questo libro è In versione originale in- 
glese, comunque molto chiaro nei te- 
sto ed un po* meno nei listati che sono 
stati ricavati tramite la stampante 
Commodore VIC 1515, notoriamente 
non tra le migliori in fatto di leggibili- 
tà, 

The V1C 20 game» hook 

(Il libro dei giochi per il VIC 

20 ) 

di Owen Bishop 

Questa volta ventuno programmi per II 
VIC 20» tutti orientati verso 11 diverti- 
mento* Girano tutti quanti sul VIC In 
configurazione base, e non sono quin- 
di richieste espansioni di memoria* Si 
passa dai giochi nel quali è richiesta 
prontezza di riflessi e dita velocissime» 
ad altri più "meditativi" in cui si misu- 
ra la propria logica con quella del com- 
puter. 

Un ottimo libro per il principiante che 
può facilmente imparare come viene 
strutturato un computer game, e può 
eventualmente trarre spunti dai pro- 
grammi proposti per crearne di propri 
o per adattarli e modificarli secondo le 
proprie esigenze. Tutti l programmi 
proposti sono ricchi di colori* di ani- 
mazioni e dì effetti sonori; allìnlzlo del 
libro e* è inoltre una parte completa- 


mente dedicata alle istruzioni per la 
perfetta copiatura dei listati, con una 
chiara spiegazione dei simboli grafici 
del VIC e delle principali istruzioni BA- 
SIC. Anche per questo libro valgono le 
considerazioni fatte per II precedente 
circa la notevole chiarezza del testo 
contrapposta almeno In parte alla non 
perfetta grafia del listati. 


THE VIC 20 

GAME S BOOK 

21 challenging games 
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OWEN BISHOP 


I libri possono 
essere ordinati 
utilizzando il 
coupon a pag. 82 
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E' IN EDICOLA 
IL NUMERO 
DUE! 


SERVIZIO 

SPECIALE: 


PC-JUNIOR 


pc sortir: 

Lotus 1-2-3 

PC-ABC: 

Sistemi operativi 



PC HARDWARE: 

Il Personal computer XT 


Calcola l'equo canone 

• GRAFICA CON IL PC 

• COME E' NATO 
L’OUVETTI M24 

• PC BOVER'S GUIDE: 

Tutti i sistemi ms-dos 


PC MAGAZINE 

Uha pubblicazione firmata... 




10 numeri della rivista Vi costeranno 40.000 lire 

(anziché 50.000). 

Per sottoscrivere l'abbonamento basta compilare 

11 modulo pubblicato qui sotto e spedirlo a: 

Gruppo Editoriale Jackson S r l. 

Via Rosellini, 12 - 20124 Milano. 

allegando assegno o fotocopia della ricevuta 

dì versamento sul c/cp n. 11666203 intestato a 

GRUPPO EDiTORiALE JACKSON - MILANO. 

□ Si, desidero sottoscrivere un abbonamento 
PC Magazlne <10 numeri ai prezzo di lire 40.000, 
anziché 50.000) 

□ Allego assegno 

□ no effettuato versamento su c/cp n. 11666203 

Nome 

Cognome 

Azienda 

Via 



CAP Otti 

□ Sono in possesso di un PC (o compatibile) 

Modello 

□ Non possiedo PC, ma lo utilizzo sul luogo di lavoro 


Compro, vendo, cambio cartuccia 
per Au ri 2600; cadutele per Cole 
coviamo e cassette con giochi per 
V1C 20 ki linguaggio macchine. 
Rkcardo Padrini via a Chiùsi l 
12/C ■ 29100 Brescia - 

Tel, 030004307 



Vendo caiseltfl C64 contenerne cin- 
que giochi: Slalom, Briscolo, Dormi 
no, Macchina Mangtosddi: e un pro- 
gramma di utility cioè bilancio fami- 
liare. Tutto ■ L 10.000. Scrivere per 
ricevere la cassetta, 

Salvatore Purgato ■ tso Europa, 26 
61030 & Marcellino (CS) 
TtlOei/6121276 


Vendo coneoAe e quattro cassette 
Atari (giocai 

Herbert Ne umano - via Sulmona. 23 
- 20139 Milano TeJ.562895 ore ae- 
rali 


Compro Hpanalonc di memoria 
Iti* perVtC 20 

Mario Boccia - V.to America Latina, 
113 - 03100 Prosinone TeLB57270 


Cassetta con PuckMan, Ga laida, 
BUU. Pitone, Asteroidi, invàderà. 5. 
Invàderà, Attacco Alleno, Dollaro. 
Briscola, Sette e mezzo, Tot, 13, 
fìoruo. Sub Chase, ecc. a L 13,000 
un prezzo da sbafo* ! ! Sono 25 gk> 
c« 

Enea Merarù - via Como, 5 - 22036 
Eri» Tei 031/61 1399 


Per VIC 20, vendo una cassetta con- 
tenente 10 splendidi giochi [Bltz, 
Rald On. Isram tee.) ■ «ole L.6.000. 
Affrettatevi 4 un' occasione da non 
perdere, 

Federico Formi! S.da 

^Vincenzo ,4fr9 10131 Torino * 
TelOl 1 «503289 


Vendo Cariridlge Adventuretond per 
VIC 20 causa doppio regalo. Mai 
usata. 

Alessio Cavalli ■ via D, Morchia, 
1/39/ A 16 162 Balzane to (G£) 
Tei. 406054 


Cambio, vendo circa 200 program- 
mi pe r 11 CBM 64, dispongo inoltre di 
circa 1 .000 programmi par 11 MC 20. 
Par contatti scrivere o telefonare a: 
Lionello lancila via Virgilio, 21 - 
74023 Mar*» di Gir™ (fa - Tel. 
09W627090 


Cambio software per C64 (giochi, 
utilitiesl Inviare Itala, si risponde a 
tutti 

Afcerto M. Campi» v» Genova, 40 
■ 07100 Sassari - 07*270126 


Cambio solo zona Napoli program- 
mi utility e giochi per C64. Vendo ba 
se Intuitivi* lori + Computer Key 
board 

Gianluca Casaburi - via Fosillk», 
146 - 60123 liapoli - 

TeLOfi 1/7694597 


ronoo software vrc 20 giochi urli- 
ttes e trucchi a proni MLereviantis 
almi scrivere a; 

MjroCMBemfdb- sbavarti, j 

33046 S.G Al Nel, f(JD> 


Vendo software di vario genere per 
CBM 64, su nastro e su disco, * 
prezzi compresi tra L 1 9.000 e L 
40.000 

Ecco akuni esempi di giochi su na- 
stro da L 13.000 (su disco L20.000) 
cadL 

Pole Poshlofi, Dlg Dug, Buck Ro- 
gers, Za moti, Congo Bongo. Q. Be rt 
Vendo Inoltro I nuovissimo gioco 
dei basivi pmt CBM 64 a L25.QO0 e 
su disco a L30.006I 
Afcerto BorgÉV - via & Rocco. 34 • 
21013 ■ Galla rate (VA) - Ti L 
0331/799770 


Vendo per CBM 64 programmi di 
Tennis, Wargate. Totocalcio. Altee k 
of Carnei ecc. Vendo anche litri per 
Commodoro VIC 20 e cose varie e 
cassette con vari pregi immL 
Renato Fetroniro via Lucerà, 1 19 - 
7U00 Foggia Tel.0881/43373 


Compro, cambio, rondo programmi 
per CBM 64 di vario genero. Dispon- 
go di splendidi giochi e ottimi pro- 
grammi di udtìtt. Spetto ri le vostro 
Uste per scantil. Rispondo a tutti 
Annuncio sempre vaidoMI 
Roberto Cordovani CR7Ì74 - 
47700 Fort 


Cartuccia "Jupfter Under'' per 
C64. Vendo a L36.000 O cambio 
con altra cartuccia che ila pari otti- 
me condizioni, 

Giovanni Addato - via Monte Vetto- 
re. 46 ■ 6013 L Ancona 


Cambio programmi per VIC 20 Ine- 
spanso. 

Riccardo D' Aurla ■ vi* PosLlilpc, 203 
■ 00123 Napoli 


Cambio software per Commodoro 
64 Vendo anche giochi L 2-000 (in 
affare!) 

Francesco Bltteri - via Cìovstso, 4 - 
20121 M «no 070991 


Vendo per VIC 20 cartuccia Gosmic 
Crune ber (MC I 922). cartuccia Sar- 
gon Il Chess iMC 19191 cartuccia 
Atteri (VIC imi Cassetta Alien 
Siiti: {VIC 6619) 

Carlo Mosconi - Sir Vacate* 
227/7/0 - 10131 Torino - 

TeL86Ì0545 


Vendo, cambio, software per C64 
(solo Milano) 

Telefonare a: 

Vincenzo Arcidiacono ■ P.zia Gram- 
sci 3 - 20154 Milano TaU17676 
oro pasti 


Cambio, vendo, compro, softwar 
per Commodore 64. Richiedere e * 
via re liste a: 

Fa br ìi lo MectlUnl - via Zanzi4 
21037 La vrna P.Tareaa (VA) 
TelQ332/M0746 


Vendo progrs rimi per C64 a proni 
eccezionali! Tratto solo zone Roma 
iM 

Gennaro Nlcodemo - via Scalpelli, 
23 ■ DOGO Ti voli {Roma) 

Te 1.0774/23990 oro serali 


Cambio listati di programmi per MC 
20 Ines penso. Manciata le voatre li- 
ste. Accatto Inoltre adesioni par f«v 
dare un nuovo Club di "MchlngN" 
Enrico Brozi u via Del VMKni, 60 - 
09100 Cagliari ■ Tal 371370 


Commodore 64 cerco programmi 
da acquista re, scambiare su casset- 
ta. soprattutto uUfey. gestionali in- 
gegneria civile. Inviare Usta con et 
ratte ratkr he ■ proli L 
Massimiliano Carabelll - via Ausirm- 
Lto, 15 - 00144 Roma 


Cereo par MC 20 Ught pen, espan- 
sione 16 K e tavoletta grafica a 
preti E trattabili. Telefonar* o scrive- 
rai al seguente Indirizzo: 

Albino Montella - via Verona, 13 < 
84091 Battipaglia (SA) - Tel 
0629/72107 


Vendo oltre 200 programmi per 
CBM 64 a prezzi stracciati Accatto 
anche cambi Scrivere o telefonare 
a: 

Luca Tambunp ■ Ma Mazzini 07 ■ 
60045 Pompei (NA) 
TcLQ8l/8&3ma 


Vendo SEGA SC 3.000 4 stampan- 
te 4 colori SEGA 5P400 + Monta* 
Computer compattato prezzo con- 
cordabtte. Si vendono anche dMal 
scrivetemi e ci metteremo d’accor- 
di. 

Aldo Santiangcb - v* SJMarts. 4 - 
62024 Mai elica (MC) - Tal 
07337102344 


|| Gruppo Astrofili Antarei comuni- 
ca la costituzione di una Sezione 
Computer ed Elettronica avvenuta il 
1 giugno 1964. U Iscrizioni a questa 
sezione sono aperte a tutti gii inte- 
ressa tL Per ulteriori Informazioni 
contattare la Segreteria presso Ro- 
berto Baldini. Ma T. Rendi. 9 480(0 
Cotipiola - RA -, Rinnoviamo rinvio 
ad associarsi a tutti gli appassionati 
romagnoli di Astronomi! e r ir nella 
mo agfi astrofili Italiani che II nostro 
Servizio Corrtpondtru* * a foro <*■ 
spoaLncme per api forma di cofta- 
borazione ed informazione. Per ogni 
informazione relativa alTattlvU e at- 
to modalità di Iscrizione al Gruppo 
Aa trafili Anta rei contattare la segre- 
terìa. 


Vendo MC 20 33K usalo pocbbil- 
mo + 6 cassette detto serie Impara 
Il BASIC direttamente dal compier 
4 registra loro a L 280 000 intrett. 
Bassam Meriti via La Spezia, 23 - 
00055 LadispolL - 06/9913075 


Vendo Game e utility per C64 da 
U5,OO0. MundtoL, Soccer, Strip Po- 
ker. Magic Desto Ingegneria civile. 
Easy Script.,, è I resto deV intera fc* 
Moteca C un ei indoro 64 su disco o 
cassetta. Inviando L1000 avrete la 
Usta dei prograrronl 
Amico Commodore 
Tcl.090/922307 


Vendo progptntrt per C64 * VIC 20 
il prezzo ectez ionato di L3.OO0 
Tteio e vendo anche programmi per 
Apple e Sinclair Spectrumalio stes- 
so prezzo. 

Danilo Savoca - Lgp Calata firn. 6 - 

90129 Palermo . Tel, 485618 


80 sgPttvtc* 






SUPERV1C è bello, però... (ovvero suggerimenti, 
Idee, critiche, richieste e tutto ciò che vT pasta per 
la tetta). 


Honm , ™ Cognome 

Via.-.™ C.1P_ 

Cftlè.^.™ _ — - Tal., 






GP550A 


due in una: stampante grafica 
e letter quality 



SEIKOSHA 


livello di co- 
sto eccellen- 
te, si propone 
per una varie- 
tà di applica- 
zioni che vanno 
dal data proces- 
sing, alla grafica, 
alla produzione di 
documenti. 


La GP550A 
è una stampante 
grafica di 
alta qualità che of- 
fre accanto al funziona- 
mento abituale in DATA PROCES- 
SING MODE (stampa comune) la possi- 
bilità di stampa in NEAR LETTER QUALI- 
TY (stampa di documenti) in un’unica 
unità. Silenziosa, affidabile e ad un 


Caratteristiche: 

• Stampante ad impatto a matrice di punti 
da 80 colonne 

• Matrice di stampa 9x8 (Data Processing 
mode) e 9x16 (Near Letter Quality mode) 

• Percorso di stampa monodirezionale (da 
sinistra a destra) 

• Capacità grafiche con indirizzamento di 8 
o 16 dot verticali 

• Possibilità di ripetizione automatica di un 
carattere grafico 

• Velocità 50 cps (Data Processing mode) e 
25 cps (Near Letter Quality mode) 

• Caratterizzazione: 10, 12 e 17 cpi (e relativi 
espansi) in DP mode; 10 e 12 cpi e relativi 
espansi, italico corsivo -10 cpi- e relativo 


espanso, super e sub scritture -17 cpi- e 
relativi espansi, proporzionale e relativo 
espanso in NLQ mode. 

• Interfacce: parallela Centronics (optionals 
Spectrum, Sinclair ZX81, seriale RS232C) 

• Alimentazione carta: trattori (larghezza 
modulo continuo variabile da 4,5 a 10”) e 
frizione (foglio singolo) 

• Stampa 1 originale e 2 copie 

• Set di 96 caratteri ASCII e 44 caratteri e 
simboli europei 

• 8 generatori di caratteri europei a bordo 

• Consumo 9W (stand by) o 30W (stampa) 

• Peso 5,5 KG 

• Dimensioni: 

305 (prof.) x 420 (largh.) x 113 (alt.) mm. 

• Nastro: singolo colore su cartuccia dedicata 




tal l : La piu letta, la prime 
T£ST: Apricot Computer 
SUPERBII - 64 pagine di 
per i vostri personal com 


PERSONAL COMPUTER: 
le prime, le migfiori! 


PERSONAL SOFTWARE 
L’unica che presenta software 
per tutti i personal: 

Commodore, Apple, Sinclair, T.I., HP, 
Sharp, Sega, Olivetti, ecc. 








